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UNIFY DBMS/DOS. The UNIX World Leader 
Brings A New DimensionTo DOS Application Development. 


What happens as the DOS world expands? As a The power of comprehensive pro- 
new generation of hardware takes over? As networking gram development and screen man- SS 
becomes more important? The potential is enormous. agement tools. Plus a state- 

But until now, the tools to achieve it have been limited. of-the-art fourth generation 

Now a leader from another world unleashes that report-writer. < — 
potential: UNIFY® DBMS. The leading relational What’s more, with UNIFY © 
DBMS in the UNIX™ world. And now, the most DBMS, the potential of networked =~ 
advanced set of application development tools in the applications becomes a reality. Unlike 
DOS world. DBMS systems which were originally 

With UNIFY DBMS, DOS developers have new _ single-user (and which have along stretch ~~ 
power to build more sophisticated applications thanever to accommodate more users), UNIFY DBMS 
before possible. is a proven multi-user system. 

The power to write high performance “C” And because UNIFY DBMS/DOS is 
programs that will access the data base, using t "s the best of two worlds, it offers you the most 
Unify’s Direct Host Language Interface. % powerful benefit of all: DBMS applications that 

The power of an industry standard y can growas your needs grow. From single user 
query language—SQL. | DOS. To networked DOS. To multi-user UNIX. 
oe The a O Sey Ge a eg All without changing your applications. 

uction applications. Only is ‘ ‘ : 
specifically engineered for transaction through- \J Call the Unify Information Hotline 
put. With unique performance features like N for our free booklet: The NewDOS World. 
PathFinder™ Architecture multiple access meth- (503) 635-7777 
ods, for the fastest possible data base access. 


UNIFY 


CORPORATION 


4000 Kruse Way Place 
Lake Oswego, OR 97034 





© 1986 Unify Corporation. UNIX™ is a trademark of AT&T Bell Laboratories. Circle no. 176 on reader service card. 


instant, and read or write files without 
delay. Unlike alternatives, the 
SemiDisk offers up to 8 megabytes of 
instant-access storage while leaving 


your computer’s main memory free NEW LOWER SEMIDISK 
for what it does best - computing! PRICES THAT WON’T 


KEEP A GRIP ON DATA SNOW YOU UNDER 
oe | | 512K 
IBMPC,XT,AT — $495 
Epson QX-10 $595 
S-100,SemiDisk II $799 


SS  m5100,SemiDisk! $595 
tter knowing not pa@ an, $695 


even a 5 hour blackout will sabotage 
your files. oo | 


e to load programs in an ling even 


Software drivers available for CPIM 80 
MS-DOS, ZDOS, Tur! | 





















Eu arent sire 
een Genie Screen 
Editor, and a Keystroke 
f . reer tee Prototypes, and 
demo or tutorial. 


ware only replay 
Editor, Word ¢ 
Editor. Insts 
Users into t 













) Assembler Genie $ 59.95 : 
Assembly Language source code generator for including 
Screen Genie prototype screens into your actual programs. 
Supports almost every language. 


) Plus Series - $ 59.95 
Assembly Language Programming Tools for Turbo Pascal, 
MS Pascal, or C. Make your prototypes into real programs. 


) NoBlink Accelerator - $ 49.95 
Resident Cursor Enhancer. Choose your own cursor shape, 
color(non-blinking), or speed in any program. Uses only 6K 
of memory. Great time time saver. Why mouse around? 


60 day satisfaction money back guarantee on all software. Not Copy Protected. 


To order, or to obtain more information call or write 
Nostradamus Inc. (801) 487-9662 
3191 South Valley Street (suite 252) 
Salt Lake City, Utah 84109 : 
NOSTRADAMUS 
Software Sourcery 


Visa, Amex, Master, Cod, PO, Check Circle no. 251 on reader service card. 
For IBM PC, XT, AT and True Compatibles. 


Outside US pays postage. 
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About the Cover 
A multitasking operating system 
is simultaneously bandleader 
and musician, and its results 
must be harmonious. 


This Issue 
With the advent of Intel’s 80386 
microprocessor, true multitask- 
ing is clearly visible on the DOS 
horizon. But the road to take us 
there—a multitasking operating 
system—is still being surveyed. 
Our feature article leads the way 
by showing how to build a task- 
scheduling kernel—the bedrock 
on which a multitasking operat- 
ing system is constructed. 


Next Issue 
We'll begin the new year with a 
look at the present and future of 
the Motorola 68000 line of pro- 
cessors. How are the chips being 
used now, and what will the 
new members of the family be 
like? What will the 68030 (or ru- 
mored 68040) add in terms of 
speed and memory? 
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PROGRAMMING BACKL 
EATING NICE BiG HOL 


LAN THAT ARE CAUSING THE BIGGEST 
BAMIAT I HISTORY ARE ALSO 








Whether it’s BASIC, COBOL, Programs that are easy to use. 
Pascal, “C’, or a data base manager, Programs that are a ae to 
you re being held back. write. 

Held back because the language And to you that means true 
has frustrating limitations, and the _ satisfaction. 
programming environment isn’t You've coveted those nifty pop-up 


intuitive enough to keep track of 
what you're working on. 
In the real world, there's pres- 


help windows some major applica- 
tions feature. But you can’t afford 
the time and energy it takes to 


sure to do more impressive work, in —__ write them into your pr S. 
less time, and for more clients. That’s the way it used to be. 
We've been given some incredibly So we fixed that, too. 
CLARION’s HELPER is an 


oan hardware in recent times, 
ut the languages aren’t a whole lot 
better than they were 20 years ago. 
So, whatever language you have 
chosen, by now you feel it’s out to 
get you — because it is. 
ure, no language is perfect, but 
you have to wonder, “Am I getting 


interactive utility that let’s you 

design the most effective pop-up 

help screens that you can imagine. 

And they’re “context sensitive, 

meaning you can have help for 

one field in your application. 
nlike the other micro 




















all I deserve?’ languages, CLARION provides 
And, like money, you'll never declarations, procedures, and 

have enough. unctions to process 
Pretty dismal, huh? dates, strings, 
We thought so, too. screens, reports, 
So we did something about it. & a indexed files, 
We call it CLARION? aang, DOS files and 
You'll call it “incredible.” 


Distributed on 7 diskettes, 
CLARION consists of over 200,000 
lines of code, taking 3+ years to 
hone to “world-class” performance. 

With CLARION you can ‘ 


pa memory tables. 


write, compile, run and debt (a 


complex applications in a 
New York afternoon. 
Even if you're in Savannah 
It gives you the power and 
S to create screens, windows 
and reports of such richness and 
clarity you would never attempt 
them with any other language. 
Because you would have to 
write the code. 
With CLARION you simply 
design the screens using our 
SCREENER utility and then 
CLARION writes the source code 
AND compiles it for you in seconds. 
Likewise, you can use 
REPORTER to create reports. 
Remember, only C ON can 
recompile and display a screen or 
report layout for modification. 
And with no time wasted. 
All the power and facilities you 
need to write great Bera, aster 
than you ever dreamed of. 


eee 
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Imagine making source program 
changes with the CLARION EDI- 
TOR. A single keystroke termi- 
nates the EDITOR, loads the COM- 
PILER, compiles the Poe loads 
the PROCESSOR and executes the 
program. It’s that easy! 

_ Our data management capabili- 
ties are phenomenal. C IN 
files permit any number of compos- 
ite keys which are updated dynami- 


any 
_ A file may have as many keys as 
it needs. Each key may be com- 
posed of any fields in any order. 
And key files are updated when- 
ever the value of the ny changes. 
Like SCREENER and RE- 
PORTER, CLARION’s FILER utility 
also has a piece of the CLARION 
COMPILER. To create a new file, you 
name the Source Module. Then you 
name the Statement Label of a file 
structure within it. 

ILER will also automatically 
rebuild existing files to match a 
changed file structure. It creates a 
new record for every existing rec- 
ord, copying the existing fields and 
initializing new ones. 
ounds pretty complicated, huh? 
Not with ON’s docu- 
mentation and on4ine help 
screens. If you are currently 
| competent in BASIC, Pascal 
s or “C” poe can be writing 
CLARION applications in a 
i& day. In two days you won't 
~ believe the eloquence of your 
CLARION programs. 

Okay, now for the best part of 
all. You can say it in C ON 
for $295.00—plus shipping and 


handling. All you need is an IBM® PC, XT, 
AT or true compatible, with 320 KB of 
memory, a hard disk drive, and a parallel port. 
And well allow a full 30 day evaluation 
aire If you're not satisfied with 


ARION, simply return it in its 
gS condition for a full refund. 
you're not quite ready to take 
advantage of this noris 
opportunity, ask for our detailed 16 
page color brochure. It vividly 
illustrates the elegance of 
C ON. Consider it a preview of 
programming in the fast lane. __ 
ither way, the 800 call’s a freebie. 


FLORIDA 33064 305/785-4555 


IBM is a registered trademark of International Business Machines Corporation. CLARION™ is a trademark of Barrington Systems, Inc. ©1986 Barrington Systems 


Circle no. 115 on reader service card. 
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I t's two-thousand- © 
odd miles from the - 
East Coast of the Unit-— 
ed States tothe West. _ 

I know exactly in 
what year I learned | 
this rough and homely 
statistic because is 
linked in my memor 
with a_ disturbin 
childhood insight into 
the nature of subjec- 
tive time. 

Halfway through the sixth grade. I 
realized that I had forgott n the fifth 
grade. Thinking back, I couldn’ t de- 
cide whether important events had 
occurred in the fourth grade or in the 
fifth or even in the early part of the 
sixth. Until then, each school year 
had seemed as distinct asa a unto | 
itself, and summers w | 
tions but a succession of avens. But 
that winter the days and weeks be 
gan to slide into one another like seg- 
ments of a telescope, and the only 
event in my life that I could with any 
certainty assign to my otherwise van- | 
ished fifth-grade year was reading 
that it was two-thousand-odd miies 
from the East Coast of the United | 
States to the West. _ | 

By the early 1980s, deccdes were 
telescoping. While researching a | 
book on what I thought was the first 
decade of the personal computer, | 
rediscovered an article written in the 
late 1970s by Sol Libes (rhymes with 
Phoebus) on the first decade of hobby 
computing. Sol referred to that arti- 
cle in an early issue of his magazine, 
S-100 Microsystems, in 1980. | read S- 
100 Microsystems scrupulously back 
then because I was working on S-100 
systems and I enjoyed Sol’s News and 

Views column. Youll find some of 
Sol’s thoughts from that period in mi- 
crocomputing history in our Ar- 
chives section on page 8 (in case 
_ you're nostalgic for them, too). 
_ Well, it was entertaining to read 
about the S-100 bus in 1980. The IEEE 
had just decided to establish a stan- 


















































wr the bus in- 
_ventec by Ed Roberts 
and MITS and seized 
upon by early micro- 
computer hobbyists 
and entrepreneurs. 
After Roberts de- 
nounced the other en- 
trepreneurs as para- 
sites,’ entrepreneur 
Howard Fullmer re- 
-named his company 
Parasitic Engineering, and the IEEE 
made Fullmer cochairman of the S- 
100 bus standard subcommittee. So, 





| there were some differences of 
| opinion. 


Time continued to ieee and 
within a few years the IEEE had 


adopted the S-100 bus standard and 


Sol’s magazine had been purchased 
and promoted and put to death by a 





major publisher. Time had tele- 


scoped me into this job, and I wrote a 
brief epitaph for Microsystems. 
Sol ignored all epitaphs and in the 


spring of 1985 began anew with Mi- 


cro/Systems Journal, featuring most 


of the familiar contributors. There 


were changes that reflected changed 
realities, but it still had the quality 


one expected from » ee 


Ahem. _ | 

This fall, M&T Publishing os 
Micro/Systems Journal. Micro/Sys- 
tems Journal has joined the group of 
M&T publications that includes Dr. 
Dobb’s Journal of Software Tools, 
Turbo Tech Report, and Business Soft- 
ware Magazine. Sol will remain edi- 
tor and will remain in New Jersey, 
and he and I will consult with one 
another. 

I'm looking fon to ) working 


_with one of the legends of the indus- 


try. Of course, it’s two-thousand-odd 
miles from the East Coast of the Unit- 
ed States to the West. But we hope to 
telescope that distance. 


Ypclad Siranre 


Michael Swaine 
editor-in-chief 
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The C for Microcom 


puters 


omen Tae 65 DOS MS-DOS, CP/M-86, Macintosh, Amiga, Apple II, CP/M-80, Radio Shack, 
Commodore, XENIX, ROM, and Cross Development systems 


Manx Aztec C86 
“A compiler that has many strengths ... quite valuable 
for serious work” 

Computer Language review, February 1985 
Great Code: Manx Aztec C86 generates fast executing 
compact code. The benchmark results below are from a 
study conducted by Manx. The Dhrystone benchmark 
(CACM 10/84 27:10 pl018) measures performance for a 
systems software instruction mix. The results are with- 
out register variables. With register variables, Manx, 
Microsoft, and Mark Williams run proportionately faster, 
Lattice and Computer Innovations show no improve- 
ment. 


Execution Code Compile/ 
Time Size Link Time 


Dhrystone Benchmark 
Manx Aztec C86 3.3 34 secs 5,760 
Microsoft C 3.0 34 secs 7,146 
Optimized C86 2.20) 53secs — 11,009 
Mark Williams 2.0 56secs 12,980 
Lattice 2.14 89 secs 20,404 


93 secs 
119 secs 
172 secs 
113 secs 
117 secs 


Great Features: Manx Aztec C86 is bundled with a powerful 
array of well documented productivity tools, library routines 
and features. 

Optimized C compiler 
AS86 Macro Assembler 
80186/80286 Support 
8087/80287 Sensing Lib 
Extensive UNIX Library 
Large Memory Model 

Z (vi) Source Editor -c 
ROM Support Package-c INTEL HEX Utility -c 
Library Source Code -c Mixed memory models -c 
MAKE, DIFF, and GREP -c Source Debugger -c 

One year of updates -c CP/M-86 Library -c 


Symbolic Debugger 

LN86 Overlay Linker 
Librarian 

Profiler 

DOS, Screen, & Graphics Lib 
Intel Object Option 

CP/M-86 Library -c 


Manx offers two commercial development systems, 
Aztec C86-c and Aztec C86-d. Items marked -c are 
special features of the Aztec C86-c system. 


Aztec C86-c Commercial System 
Aztec C86-d Developer’s System $299 
Aztec C86-p Personal System $199 
Aztec C86-a Apprentice System S49 


All systems are upgradable by paying the difference 
in price plus $10. 


Third Party Software: There are a number of high qual- 
ity support packages for Manx Aztec C86 for screen 
management, graphics, database management, and soft- 
ware development. 
C-tree $395 
PHACT $250 
HALO $250 Amber Windows $59 
PRE-C $395 Windows for C $195 
WindScreen $149 FirsTime $295 
SunScreen $99 C Util Lib $185 
PANEL $295 Plink-86 $395 


$499 


Greenleaf $185 
PC-lint $98 


Manx Aztec C68k 


“Library handling is very flexible ... documentation is 
excellent ... the shell a pleasure to work in... blows 
away the competition for pure compile speed... an ex- 
cellent effort.” 

Computer Language review, April 1985 


Aztec C68k is the most widely used commercial C com- 
piler for the Macintosh. Its quality, performance, and 
completeness place Manx Aztec C68k in a position be- 
yond comparison. It is available in several upgradable 
versions. 
Optimized C 
Macro Assembler 
Overlay Linker 
Resource Compiler 
Debuggers 
Librarian 

Source Editor 
MacRam Disk -c 
Library Source -c 


Creates Clickable Applications 
Mouse Enhanced SHELL 
Easy Access to Mac Toolbox 
UNIX Library Functions 
Terminal Emulator (Source) 
Clear Detailed Documentation 
C-Stuff Library 

UniTools (vi,make,diff,grep) -c 
One Year of Updates -c 


Items marked -c are available only in the Manx Aztec 
C86-c system. Other features are in both the Aztec C86-d 
and Aztec C86-c systems. 


Aztec C68k-c Commercial System $499 
Aztec C68d-d Developer’s System $299 
Aztec C68k-p Personal System $199 
C-tree database (source) $399 


AMIGA, CP/M-68k, 68k UNIX call 


Manx Aztec C65 


“The AZTEC C system is one of the finest software 
packages I have seen” 
NIBBLE review, July 1984 


A vast amount of business, consumer, and educational 
software is implemented in Manx Aztec C65. The quality 
and comprehensiveness of this system is competitive 
with 16 bit C systems. The system includes a full optim- 
ized C compiler, 6502 assembler, linkage editor, UNIX 
library, screen and graphics libraries, shell, and much 
more. The Apple II version runs under DOS 3.3, and 
ProDOS, Cross versions are available. 

The Aztec C65-c/128 Commodore system runs under 
the C128 CP/M environment and generates programs for 
the C64, C128, and CP/M environments. Call for prices 
and availability of Apprentice, Personal and Developer 
versions for the Commodore 64 and 128 machines. 


Aztec C65-c ProDOS & DOS 3.3. $399 
Aztec C65-d Apple DOS 3.3 $199 
Aztec C65-p Apple Personal system $99 
Aztec C65-a for learning C $49 
Aztec C65-c/128 C64, C128, CP/M $399 


Distribution of Manx Aztec C 


In the USA, Manx Software Systems is the sole and ex- 
clusive distributor of Aztec C. Any telephone or mail 
order sales other than through Manx are unauthorized. 


ee ar oe en ee ene ae Ccee oe ry 
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Cross developed programs are edited, compiled, assem- 
bled, and linked on one machine (the HOST) and trans- 
ferred to another machine (the TARGET) for execution. 
This method is useful where the target machine is slower 
or more limited than the HOST, Manx cross compilers 
are used heavily to develop software for business, 
consumer, scientific, industrial, research, and education- 
al applications. 


HOSTS: VAX UNIX ($3000), PDP-11 UNIX ($2000), MS- 
DOS ($750), CP/M ($750), MACINTOSH ($750), 
CP/M-68k ($750), XENIX ($750). 


TARGETS: MS-DOS, CP/M-86, Macintosh, CP/M-68k, 
CP/M-80, TRS-80 3 & 4, Apple II, Commodore C64, 
8086/80x86 ROM, 68xxx ROM, 8080/8085/Z80 ROM, 
65xx ROM. 

The first TARGET is included in the price of the HOST 
system. Additional TARGETS are $300 to $500 (non 
VAX) or $1000 (VAX). 

Call Manx for information on cross development to the 
68000, 65816, Amiga, C128, CP/M-68K, VRTX, and 
others. 


Manx Aztec CII 


‘Tve had a lot of experience with different C compilers, 
but the Aztec C80 Compiler and Professional Develop- 
ment System is the best I've seen.” 

80-Micro, December, 1984, John B. Harrell III 


Aztec C II-c (CP/M & ROM) $349 
Aztec C II-d (CP/M) $199 
C-tree database (source) $399 
Aztec C80-c (TRS-80 3 & 4) $299 
Aztec C80-d (TRS-80 3 & 4) $199 


How To Become an Aztec C User 


To become an Aztec C user call 1-800-221-0440 or call 
1-800-832-9273 (800-TEC WARE). In NJ or outside the 
USA call 201-530-7997. Orders can also be telexed to 
4995812. 

Payment can be by check, COD, American Express, 
VISA, Master Card, or Net 30 to qualified customers. 

Orders can also be mailed to Manx Software Systems, 
Box 55, Shrewsbury, NJ 07701. 


How To Get More Information 

To get more information on Manx Aztec C and related 
products, call 1-800-221-0440, or 201-530-7997, or write 
to Manx Software Systems. 


30 Day Guarantee 

Any Manx Aztec C development system can be return- 
ed within 30 days.for a refund if it fails to meet your 
needs. The only restrictions are that the original pur- 
chase must be directly from Manx, shipped within the 
USA, and the package must be in resalable condition. 
Returned items must be received by Manx within 30 
days. A small restocking fee may be required. 


Discounts 

There are special discounts available to professors, 
students, and consultants. A discount is also available on 
a “trade in” basis for users of competing systems. Call for 
information. 
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O ur eel issue of & 
the listings on 
disk is out now. On it | 
: you'll find an eclectic | 
collection of files, from | 
Jan Steinman’s Worm | 
Memory Test for the 
68000 to Richard R 
man’s 32000 assemble : 
(in this issue). You'll 
find MclIvor’s Radix 
Sort; Ashdown’s Cubic 
Splines program; the bepehiarks 
used in the Elkins/King turbo board 





review: a whole bunch of stuff from | 
‘Holub’s and Duncan's columns; and a | 
couple of interesting Macintosh yro- 


grams, including the Digital Dis 
demo by Mike Morton and How rd 
Katz's Mandelbrot program. See the 
DDJ ad catalog for more information. 


This month’s pone is Oana 
systems, and we have a couple of in- 
oe foes one jead article 
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of single issue published nearest to filing date: 


focuses on a_ task 
scheduling routine, 
the central kernel of 
any multitasking sys- 
_ Echelon’s ZCPR is a 
Z380 CP/M work-alike 
that is not only more 
powerful than the 
original CP/M but also 
is more interesting: the 
© code is tighter and 

takes a sae of the Z80 in- 


_ struction set. In this issue, Morris Si- 


mon takes a look at ZCPR. 
This issue also features a complete 


- | 32000- -family cross assembler by 
» | Richard Rodman. We're printing the 


listings in Cauzin Softst rip format. 
What do you think of the Softstrip 
listings? Please call oe 


Nick Turner 
_ editor 





GEMENT, AND CIRCULATION 
: Title 39, United States oe 













| copies each issue dure preceding 12 ont 
_ 37,997. Actual number of copies of single issue 
published nearest to filing date: 40,519. 


C. Total Paid Circulation. Average number of 
copies each issue during preceding 12 months: 
50,446. Actual number of copies of single issue 
published nearest to filing date: 57,049. 


. Free distribution by mail, carrier, or other 
means, samples, complimentary, and other free 
copies. Average number of copies each issue 
during preceding 12 months: 2,104. Actual num- 
_ ber of copies of eS issue po nearest to 
filing date: 2,760. 
E. Total ditribuien. Average nuraber of copies 
each issue during preceding 12 months: 52,550. 
Actual number of copies of single issue pub- 
lished nearest to the filing date: 59,809. 


F. Copies not distributed. 1. Office use, left over, 
unaccounted, spoiled after printing. Average 
number of copies each issue during preceding 12 
months: 1,412. Actual number of copies of single 
issue published nearest to filing date: 600. 2. Re- 
turns from News Agents. Average number of 
copies each issue during preceding 12 months: 
5,335. Actual number copies of single issue pub- 
lished nearest to filing date: 7,085. _ 


G. Total. Average number of copies each issue dur- 

ing preceding 12 months: 59,297. Actual number 

of copies of single issue published nearest to fil- 
ing date: 67,494. 





























I certify that the statements made by me above are cor- 
rect and complete. 


Laird Foshay, Publisher 
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Large model C compiler 





performs like big-name brands 
includes free C tutorial 


“As good as or better than most of the heavyweights...” 
DR. DOBB’S, August 1986 


The DATALIGHT C COMPILER isa 
full-implementation of the C language 
as defined in The C Programming 
Language by Kernighan and Ritchie. 
Supporting five memory models, 
DATALIGHT C has very fast compile, 
link, and execution times with a 
minimum of memory required. Our 
special introductory price is only $99 
for the DEVELOPER’S KIT. 


Optimize Your Code Generation 


Now you can produce highly opti- 
mized code in the standard Intel object 
module format. The optimizations 
performed include common subex- 
pression elimination, branch optimi- 
zations, constant folding, strength 
reductions, dead-code eliminations, 
and switch table compaction. 


Five Memory Models Supported 


DATALIGHT C provides five mem- 
ory models so you can use the model 
that best suits your application. 


Memory Models 
Model Code Data 
Compact 64k total code & data 
Small 64k 64k 
Program 1M 64k 
Data 64k 1M 
Large 1M 1M 


Compiling, One step... 


Now with the one step DLC program 
you can compile, link, and create a 
COM file. Also, one or more files can be 
compiled and linked using DLC. 


Complete Library 
Includes Source Code 


The UNIX compatible library includes 
complete source code. Experienced 
programmers can use the source code 
to configure and rebuild the library to 
suit the application. 


Concise Documentation Included 


The DATALIGHT C COMPILER and 
DEVELOPER'S KIT include a concise, 
to the point, programmer’s manual. 
The 210-page manual is contained in 
an IBM-style three-ring binder which 
includes nine chapters, appendices, 
index, and easy to follow examples. 


Datalight 


BOX 82441 
KENMORE, WA 98028 
(206) 367-1803 





Circle no. 203 on reader service card. 





30-DAY MONEY-BACK GUARANTEE 


Try our DEVELOPER'S KIT for 30 
days, and if you do not find it to be 
equal to, or better than, any compiler 
you have, or are using, then you may 
return it for a full refund. Also, if you 
return the compiler within 30 days, 
you may keep the C tutorial, a $39 
value, for trying our DEVELOPER’S 
KIT. 


Introductory Prices 
DATALIGHT C without source $60 


(compact & small memory model support) 


DEVELOPER’S KIT with source $99 


(five memory models supported) 


Not Copy Protected 


ORDER TOLL-FREE TODAY! 
1-(800) 221-6630 |, 
*SPECIAL OFFER! 


ORDER the DEVELOPER’S KIT by 
December 31, 1986 and receive FREE... 





‘‘Combines print and software 
technology to create the most inte- 
grated new type of training system I 
have ever seen:’ 


ADAM GREEN, INFO WORLD 
January 27, 1986 


‘“C:A Programming Workshop” is a 
complete C language learning package 
with an integrated compiler and 
screen editor. Learn the C language 
with tutorials, quizzes, and program 
exercises. 


Add $5 for shipping in US/$15 outside US 
COD (add $2.50) 


*Limited offer available exclusively to readers 
who purchase directly from DATALIGHT. 





Magazine Reviewers Shocked by 
DATALIGHT’S PERFORMANCE... 


‘Reviewing this compiler was quite a surprise for 
us. For such a low price, we were expecting a 
“lightweight” compiler. What we got was a package 
that is as good as or better than most of the 
“heavyweights.” DATALIGHT C implements a 
complete C language. It also compiles quickly, 
doesn’t take up much disk space, and looks 
impressive in the benchmarks:’ 


DR. DOBB'S, August 1986 


“This is a sharp compiler! ... what is impressive 
is that DATALIGHT not only stole the compile time 
show completely, but had the fastest Fibonacci 
executable time and had excellent object file sizes 
to boot!” 


Chris Skelly, COMPUTER LANGUAGE 
February 1986 





DEVELOPER’S KIT (VERSION 2.12) 


¢ Full UNIX System 5 C language plus ANSI extensions. 

¢ Fast/tight code via powerful optimizations including 
common sub-expression elimination. 

¢ DLC one step compile/link program. 

¢ Multiple memory model support. 

¢ UNIX compatible library with PC functions. 

¢ Compatible with DOS linker and assembler. 

¢ Third-party library support. 

¢ Automatic generation of .COM files. 

¢ Supports DOS pathnames, wild cards, and Input/ 
Output redirection. 

¢ Compatible with Lattice C version 2.x. 

¢ Interrupt handling in C. 

¢ Debugger support. 

¢ ROMable code support/start-up source. 


MAKE Maintenance Utility 


¢ Macro definition support. 

¢ MS-DOS internal commands. 
¢ Inference rule support. 

¢ TOUCH date manager. 


Tools in Source Code 


¢ cat—UNIX style “type” 

¢ diff—Text file differences 

¢ fgrep—Fast text search 

¢ pr—Page printer 

¢ pwd—Print working directory 
¢ wc—Word count 
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Burning C 

Dear DDJ, 

So, the high priest of obsCu- 
rity defends the purity of 
the faith against the un- 
washed. Or was Allen Ho- 
lub’s August Viewpoint 
merely a stalking-horse? 
Better make that a dead 
horse; let’s flog it some 
more. 

First of all, my program- 
ming credentials are better 
left unsaid, though I do 
program regularly in two 
assembly languages, read 
(manual in hand) two or 
three more, Own and try 
to read Knuth, hate strong- 
ly typed languages, dislike 
long-winded compilers, 
and love Forth. And as for 
C, it is everything negative 
that has been published in 
DDJ et al. You might accu- 
rately surmise that I 
wouldn't want to take Mr. 
Holub's C classes and that 
U.C. Berkeley wouldn't let 
me anyway. But.... 

It doesn't take too long 
for the non-C-fluent to re- 
alize what is the problem 
with the language and 
their grasp of it: that the 
ordinary control struc- 
tures they use in any other 
language are damned diffi- 
cult to pick out of a C list- 
ing. They are so difficult 
that someone has even 
written a book about it: 
The C Puzzle Book. In spite 
of Mr. Holub’s wishy “‘C is 
difficult [because of] the 
ways that pointers are 
used and so forth’’ and 
washy  ‘‘assembly-lan- 
guage programmers usual- 
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ly have little difficulty 
learning about pointers, ’ it 
is the symbols of the lan- 
guage that boggle—you 
are continually reminded 
that everything you know 


is wrong. % != // %s\n 
indeed! 
main ) 
{curse 
(K ==—"R&& “8% 
eat; ) 


= ‘@#%+# K&R’s C’: 
} 


Combine two glaring stu- 
pidities: a language-wide 
propensity for the least pos- 
sible typing (these guys are 
two-fingered for sure) and 
a finicky syntax based upon 
{}(); /* ¥. God forbid 
that you miss one.) Add a 
heavy dose of self-righ- 
teous disdain for anyone 
less than an operating sys- 
tem hacker; a black-box 


Cucgilaee 





(‘‘well, this bit works so let’s 
forget comments’) library 
archive; vested interests of 
book publishers to sell 
books that almost explain; 
and finally, those software 
firms and authors who al- 
ready have “it’’ on one ma- 
chine (so let’s port it every- 
where). Result: a popular 
language with commercial 
interests that’s difficult to 
learn yet easy to use and 
that pays increasing divi- 
dends to those who have 
the most time and code 
invested. 

Anyway, ‘‘Easy C’’ by 
Orlin and Heath did one 
thing that all of C Chest 
never has: permitted me to 
read and use C within an 
hour. The authors’ ap- 
proach to C is unique in 
that they didn't say every- 
thing I knew was wrong. 
So, with some quick typ- 
ing, I've my own EASYC.H. 


MULT) TASKING— 


Interestingly, mine isn't 
much like Orlin and 
Heath’s but more like 
Forth (the control con- 
structs) and 9900 assembly 
language (the operators). I 
use it to write code that I 
can read tomorrow, and 
with its listing in hand, I 
can decipher even Mr. Ho- 
lub’s constructs. 

I once wrote a disassem- 
bler that printed out the 
English translation of in- 
structions—for example, 
Load Immediate for LI. Af- 
ter a while I got impatient 
with its long-windedness 
and put the ‘correct’ ones 
into the data. I guess I 
learned the language. EA- 
SYC.H works in the same 
way. After a while, INC gets 
more tiresome to type than 
++. The neat thing about 
EASYC.H is that I can mix 
the representations within 
the same program. Allen 
Holub reveals more the ex- 
pert’s impatience than in- 
sight into how Easy C can 
aid the beginner. 

And yes, the defines for 
>=, <=, >, < aredumb. 
But the ones for &&, //, !, 
ST ed &, = i <<, ee, 
++, ——, and 4%, are god- 
sends for someone who 
can’t stand to look at (or 
use) C more than once a 
month. If Allen Holub 
wanted to do something 
really useful with C Chest, 
he might publish yet an- 
other pipeline program 
that would purify yours.c 
his.c and its converse bas- 
tardize his.c readable.c. 

Purify might be already 
done by the first pass 
through the parser, but I 
could see using bastardize 
every time I downloaded a 
C program. Or typed in one 
of Mr. Holub’s gems of con- 
ciseness. That'll work very 
nicely—it will require the 
least typing and provide 
the most readability. 
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Your wish 


UNIX operating systems have a well deserved reputation for their 
powerful command set. Now PCNX gives you the same powerful 
commands. And a lot more. 

Built with Wendin’s Operating System Toolbox, PCNX is the only 
multitasking, multiuser operating system that can put the popular 
features of UNIX on your personal computer (IBM PC, AT, XT, or true 
compatible) for under $100. 

If you’re already familiar with the UNIX environment you know what 
that means. If you aren’t, PCNX is your chance to discover what you’ve 
been missing at a price you can finally afford. 

Designed specifically for systems programmers, PCNX has all the 
features that have made UNIX the preferred environment for systems 
development. Commands that let you perform complex operations with 
a few keystrokes. Plus syntax that lets you compile programs in the back- 
ground, handle piping and I/O redirection, and build shell script files. 

And that’s not all. 

PCNX links the popular Bourne shell to Wendin’s unique kernel. As a 
result, you have access to more than eighty enhanced system services 
built into all our Personal Operating Systems. 

Like our other Personal Operating Systems, PCNX also runs well- 
behaved MS-DOS programs, is fully compatible with the MS-DOS file 
system, and uses existing MS-DOS compilers, linkers and utilities. 

In addition, it comes with complete source code that lets you see for 
yourself exactly how the system works. 


So if you’ve ever wished you had the power and flexibility of UNIX 
on your PC, why not stop wishing and order PCNX today. 


PCNX. From Wendin. Only $99. 


ORDER HOTLINE 
a (509) 235-8088 
LAL Y 20x 266 wa soo, (MON-FRI. 8-5 PACIFIC TIME) 


© in, Inc. The people who make quality 
Copyright 1986 Wendin, Inc ae acer whataber 
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IS our Commands. 


Ask about our other products 
for the IBM PC and true 
compatibles. 


PCVMS™ 


Multitasking, multiuser version of 
DEC’s powerful VAX/VMS operating 
system. Runs most MS-DOS 
programs. 


XTC® 


The ultimate programmer’s editor. 
Multitasking macro language plus 
multiple linkable windows and 
buffers. 


OPERATING SYSTEM 
TOOLBOX™ 


Complete software construction set 
that lets you build your own 
multitasking, multiuser operating 
systems. 


All products priced at $99 
with source code included. 


DEALER INQUIRIES WELCOME 


Foreign orders inquire about shipping. 
Domestic orders add $5.00/1st item, $1.00 each 
additional item for shipping, handling, and 
insurance. We accept Visa/MC, American 
Express, COD, and Bank Drafts drawn on U.S. 
Banks. 

Washington residents add 7.8% sales tax. 


MS is a trademark of Microsoft, PC-DOS is a 
trademark of IBM. UNIX is a trademark of AT&T. 
VAX/VMS is a registered trademark of Digital 
Equipment Corporation. 


Wendin and XTC are registered trademarks of 
Wendin, Inc. PCNX, PCVMS, Operating System 
Toolbox, and Personal Operating System are 
trademarks of Wendin, Inc. 


LETTERS 
(continued from page 10) 


Finally, computers were 
developed to help math 
wizards do millions of cal- 
culations—big deal. I use 
mine to write letters, call 
up CIS, and draw pictures. I 
couldn't care less why C 
was put on this earth and 
will resist the fascist Pascal 
to my dying day. If you're 
new to the programming 
business, you should be 
learning Forth, not Pascal. 

Frederick Hawkins 

1020 N. 6th St. 
Allentown, PA 18102 


 #define GENERIC 
 ELEM_TYPE 
{\ 
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Table 2: Generic Shell sort in Sinclair SuperBasic 


Structured 
Programming 

Dear DDJ, 

I was surprised that Mr. 
Shammas’ column on ge- 
neric routines (Structured 
Programming, August 
1986) did not include any 
reference to the ability to 
create generic C routines 
through the preprocessor. 
I should point out that this 
is not my idea. The tech- 
nique is described in Ad- 
vanced C: Food for the Edu- 
cated Palate, by Narain 
Gehani (Computer Science 
Press, 1985)—a useful and 
well-written book. I in- 


clude a generic sort routine 
[see Table 1, below] that I 
have found useful for sort- 
ing arrays of various types. 
It can be instantiated by: 


GENERIC_SORT(int_sort, 
int, >), 

or 

GENERIC_SORT- 


(float_sort, float, <) 


The sort I used is the stan- 
dard Shell sort, a la K & R. 
Keep up the good work! 
Kit Kauffmann 
Algorithms Unlimited 
P.O. Box 3516 
Ogden, UT 84409 








Dear DDJ, 

I read with interest the Au- 
gust 1986 Structured Pro- 
gramming column about 
generic procedures in Ada 
and Modula-2. I agree that 
generic procedures are 
powerful and desirable 
features. 

Both languages imple- 
ment generic procedures 
in an overly complicated 
manner, however. I use a 
language in which all pro- 
cedures and functions are 
generic because all formal 
parameters are typeless 
until the procedure or 
function is called. Another 
feature of this language 
that helps toward generic 
procedures and functions 
is coercion between data 
types. You can set string 
variables equal to numeric 
types and vice versa. Inte- 
ger variables set equal to a 
real number will automati- 
cally round the real num- 
ber to the nearest integer. 
Real number variables can 
take on the value of inte- 
gers. I feel that late binding 
procedures and functions 
and coercion between data 
types provide an ideal pro- 
gramming environment. 
The language that provides 
these features is Sinclair 
SuperBasic as implement- 
ed on the Sinclair OL. This 
version of BASIC is highly 
structured and flexible, 
supporting such features 
as bitwise manipulation. I 
have included a listing [Ta- 
ble 2, left] of a generic Shell 
sort in SuperBasic that can 
sort strings, reals, and inte- 
gers. Love your magazine! 

Michael A. McCoy 

Box 84 King Edward's Ct. 

Rocky Mount, NC 27803 
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ACKERMAN 
MARSHAL PASCAL 
IBM PASCAL 
TURBO PASCAL 
MICROSOFT C 4.0 
Time (sec.) Code size Time (see.) 
Unparalleled Speed and Power 


Marshal Pascal™ is the most highly code-optimized Pascal com- 
piler for PCs. Period. In fact, Marshal Pascal produces code so fast 
and compact that even the most efficient C compilers fall behind in 
performing many operations. Also, Marshall Pascal is an ISO imple- 
mentation thus offering portability to other computer environments. 
You may address as much memory as your operating system allows 
and a variety of memory models are supported. Among the useful 
extensions included are: separate compilation of modules (both Mod- 
ula-2 and Pascal forms), structured constants and structured function 
values, variable-length string types and procedural parameters. 


Turbo Pascal® Dialect Filter 


Our Dialect Filter helps bring your Turbo Pascal programs over 
to an ISO/Marshal-readable format. Watch your present Turbo prog- 
rams run in a fraction of the time and code space! 


8087-80287 Support 


Marshall Pascal supports the Intel 8087-80287® math processors 
inline. If the user has no math chip then ’87-287 code emulation is a 
provided option. 


Microsoft Linkability 


Marshal Pascal’s true relocatable linker allows the user access to 
the Microsoft family of languages and assemblers. A flexible object 
code librarian and powerful overlay capabilities are also included. 
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PASCAL MT-+ 


Turbo Pascal 
Microsott Pascal | 
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Time (sec.) Codesize Time(sec.) Code size 


Powerful Compile Options 


Marshal Pascal permits a number of compile options including 
an optimization by-pass for speedier compiles, I/O “fine- -tuning”’, 
constant “folds” and a syntax evaluator just to name a few. A wealth 
of compile-time checks permit the user to find the more subtle logic 
errors reducing debugging time enormously. 

Space does not permit us to list all the features of Marshal Pascal 
all of which are provided USER options, not additional cost options. 
Marshal Pascal is not broken apart to make many products out of 
what should be only one good one. 


The Price? 
$189. 


includes everything. 
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Supports PC-DOS®, MS-DOS®, CP/M-86® and Concurrent DOS®. 


To order your copy of Marshal Pascal, call: (800) 826-2222 
In California: (415) 947-1000 


Marshal Pascal is a TM of Marshal Language Systems. Pascal MT + , CP/M-86 and Concurrent DOS are ® of Digital Research, Inc. 
IBM Pascal, PC-DOS are ® of IBM Corp. Turbo Pascal is a ® of Borland International, Inc. Microsoft TM, Microsoft C and MS-DOS 
are ® of Microsoft Corp. Mystic Pascal is a ® of Mystic Canyon Software. Intel 8087/80287 is a TM of Intel Corp. UCSD Pascal is a 
TM of Pecan Software Systems. Utah Pascal is a TM of Ellis Computing, Inc. 


Marshal Language Sustems — 1136 Saranap Ave. — Walnut Creek, CA 94595 


Circle no. 317 on reader service card. 
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VIEWPOINT 


And you may ask yourself 

What is that beautiful 
house? 

And you may ask yourself 

Where does that highway 
go to? 

And you may ask yourself 

Am I right?... Am I 
wrong? 

And you may Say to 
yourself 

My God! What have I done? 

from ‘‘Once in a Lifetime ” 

—David Byrne, Brian Eno 


I've a confession to make— 
I'm really a composer, a 
musician, not a computer 
programmer at all. I went 
back to school to learn how 
to build synthesizers, and 
learning about computers 
was a side effect. I like to 
program and to design 
hardware, but I’ve become 
increasingly uncomfort- 
able about engineering as a 
profession. More accurate- 
ly, I have reservations 
about the uses to which my 
work can be put. 

My main reservations 
have to do with weapons 
construction. I don't like it, 
but it can be difficult to get 
away trom. After graduat- 
ing, I worked on miltary- 
related projects for a while 
without really worrying 
about the ultimate pur- 
poses of my work. The 
work was technically in- 
teresting and wasn't close- 
ly related to weapons de- 
velopment—or  so_ I 
thought. One day, after 
working for a year on a 
consulting project—build- 
ing a manufacturing con- 
trol system for airplanes—I 


by Allen Holub 


discovered that the air- 
planes in questions were F- 
16s. This project was much 
too close to weapons pro- 
duction for me to be com- 
fortable; I could no longer 
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ignore what I was doing. 

This put me in a real 
quandary. On one hand I 
was disgusted by what I 
was building; on the other 
hand I had committed my- 
self to finishing the project 
and I’m very old-fashioned 
about fulfilling promises. If 
I just left the project, it 
wouldn't get finished (I 
was managing the soft- 
ware development and 
had written a good portion 
of the code). I dealt with 
my conscience by doubling 
my consulting rate and giv- 
ing the extra money away 
to peace groups. The client 
was not happy but had no 
choice. I finished up the 
project as quickly as I could 
and left. | 

I had no trouble finding 
another consulting job. My 
new cClient’s reaction to 
what had transpired at the 
old job was more amuse- 
ment than anything else, 
and I thought I had found a 
company with a con- 
science. Unfortunately, the 
new company started pro- 
ducing products that were 
sold almost exclusively to 
defense contractors. I 
wasn't working on these, 
but I was still uncomfort- 
able. Giving money to 
peace groups didn’t satisfy 
my conscience anymore. 

There is no easy way for 
me to deal with conflicts 
between my professional 
interests, financial needs, 
and conscience. The prob- 
lems have been made 
worse by the Reagan ad- 
ministration’s emphasis on 
defense spending—let’s 
face it, an ever increasing 
percentage of the interest- 
ing and well-paying jobs 
are in weapons work. My 
solution has been to move 
gradually out of the field. I 
only take consulting pro- 
jects that I’m convinced are 
not related to weapons and 


with companies that don't 


do weapons work. I’m a 


DUMPY, a downwardly mo- 
bile young professional. 
My income has dimin- 
ished, but it’s still adequate. 
More important, I’m doing 
things that I think benefit 
society. 

To make my ‘“‘sudden on- 
slaught of conscience” (to 
quote one of my managers) 
more intelligible, I'll ex- 
plain some of my political 
views. I’ve come to believe 
that the out-of-control 
arms buildup is not just the 
responsibility of govern- 
ment. Nuclear weapons 
don’t spring, like Athena, 
fully armed from the head 
of Zeus. They’re designed 
and built by engineers and 
programmers, by you and 
me. If we refused to build 
them, they wouldn't exist. 

How is it, then, that a 
programmer who sup- 
ports a nuclear freeze goes 
off to work every morning 
for a defense subcontrac- 
tor that’s making control 
systems for F-16s? How can 
we allow a regular pay- 
check to be more impor- 
tant than the ultimate 
harm we are doing to soci- 
ety? Weapons work is 
grave digging, quite literal- 
ly. What good is a nice fat 
paycheck when your life 
has been reduced to a heap 
of radioactive slag? If nu- 
clear weapons are used 
again, won't the develop- 
ers be just a much mass 
murderers as the madmen 
who pushed the buttons? 

Of course, there are peo- 
ple who have thought 
about these issues and have 
come to the opposite con- 
clusion from mine: They 
believe that a strong nucle- 
ar arsenal makes the world 
a safer place. Though I 
think they’re wrong, these 
people are at least acting 
according to their beliefs. I 


have a hard time, though, 
with people who refuse to 
look at the issues and build 
weapons anyway. We 
don’t mitigate the effect of 
our work by not analyzing 
what we're doing. That the 
human race could be put to 
an end, and that some hu- 
mans seem to be trying to 
do just that, should give 
any thinking person pause. 
That people can just sit 
back and let this happen is 
unconscionable. That some 
engineers claim to oppose 
the use of nuclear weapons 
or don’t look at the issues of 
weapons production and 
still help to build them is 
worse. 

What I’m trying to do is 
to convince you to do 
something. Those who 
don’t like the work their 
companies are doing could 
try tochange things. If they 
can't, they could get anoth- 
er job—like Peter Hagel- 
stein, the key Star Wars sci- 
entist who recently 
resigned from Lawrence 
Livermore Lab because he 
was reportedly so unhap- 
py about doing weapons 
research with X-ray lasers. 

I strongly believe that an 
engineering ethics course 
should be a required part 
of every EECS curricu- 
lum—a course that would 
get people to look beyond 
that fat paycheck to the ef- 
fects of their work on soci- 
ety. Those of us who work 
for universities could try to 
get such a course going. We 
can contact our legislators. 
We can work with peace 
groups. Whatever we do, 
we musn’t sit around and 
wait for the bombs to be 
dropped—or they will be. 


DDJ 
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When You Need To Do Two Things At Once — 







Alloy’s Bi-TURBO combines the 
features of today’s best-selling 
boards and adds distinctive Alloy 
engineering experience to create the 
first accelerated dual-tasking card 
for personal computers. Bi-TURBO 
is the complete dual-tasking solution, 
with everything you need to be 
twice as productive. 


@ Adds power to PCs, XTs and 
even ATs 

@ Adds a full 640 KB of “‘second 
task’’ RAM, with its own 
8 MHz processor 


@ Adds 256 KB of RAM-based disk 
cache to speed disk access 
for both tasks 


@ Easy-to-use dual tasking software 
— switch full screen windows 
with a keystroke! 


@ Print spooler, with multi-printer 
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Do the Work of Two PCs 


You’re in the middle of a three-hour 
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spreadsheet — NOW! Bi-TURBO to 
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keyboard and you’re running the 
spreadsheet — while the mail merge 
task continues to run at full speed. 
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Bi-TURBO’s RAM-based disk cach- 
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Bi-TURBO gives you the features 
and benefits of multi-function cards 


Bi-TURBO Doesn’t Share Time, It Makes Time 
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Windows 
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Windows does two jobs. Part of one, part of the other, and so on... witha 
decrease in power, increase in time and overhead. 


Run one job. Run the next job. Very inefficient. : 


Bi-TURBO really does two jobs at once. On two processors at once. 
Global disk caching benefits both processors. 
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ARTICLES 


A Multitasking 





Kernel 


by Ken Berry 


ele is a multitasking 
k operating system for 
the IBM PC and com- 


patibles that is written in C 
and assembly language. This 
article describes in detail the 
most critical part of Tele, the 
task scheduler, which han- 
dles the allocation and distri- 
bution of CPU time to the var- 
ious tasks in the system. If you roll your own operating 
system, the task scheduler probably will present the most 
difficult problems. I hope to provide enough information 
to make it possible for you to design a task-scheduling 
kernel for your own multitasking operating system. 

Tele contains three large blocks of code: the run-time 
library, the file system, and the task scheduler. These ac- 
count, roughly, for 1/3, 1/2, and 1/6 of the total amount of 
code. 


The Run-Time Library 

The Tele run-time library has unique features, but all 

such libraries are essentially alike. They encapsulate algo- 
rithms common to a wide range of applications and 

thereby reduce the amount of time needed to code appli- 

cation programs. 


The File System 

Tele’s file system is complex because of my requirement 
that it support both MS-DOS and Unix media. All my devel- 
opment tools were written for MS-DOS, so all the files had 
to be on MS-DOS media. I could therefore use MS-DOS for 
the file system as I implemented other parts of Tele. I 
eventually completed the Tele file system to significantly 
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improve performance, but 
everything else was fully 
tested at that time. 


Task Scheduler 


The security kernel, or task 
scheduler, of an operating 
system is responsible for the 
allocation of system re- 
sources to tasks. It takes its 
name from military and financial applications in which 
security means protection against intrusion and sabotage. 
I don't worry about that kind of security because I don’t 
leave my computer connected to the public communica- 
tions system. I do, however, make programming mis- 
takes. In particular, I sometimes mess up the stack and 
cause a program to return to the wrong location. When a 
program runs wild, it can execute any conceivable code, 
so there is no logical difference between a saboteur pro- 
gram introduced by a spy and a benign program that has 
run wild. An operating system that cannot be crashed by 
an application is identical to one that is secure from 
intrusion. 

In order to make a secure (or crashproof) system, you 
must have a task scheduler that enforces certain rules on 
every other program. The rules determine what data can 
be accessed and where control can be passed; they must 
be enforced on the execution of every instruction. Proces- 
sors such as the 80286 and 80386 check every instruction 
for security violations. Other processors, such as the 
68000 and 32000 series can also support secure systems. 
The more common 8086 and 8088 processors cannot. 

The necessary, and sufficient, rules for a secure system 
are simple. All programs are ranked according to security 
level, or degree of trust. A task can access data only at its 
own level or at a less trusted level. It can call another 
program or subroutine at its own level or at a more trust- 
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ed level. Conversely, no program can 
access data from a more trusted level, 
nor can control be passed to a less 
trusted program in a call or branch. On 
a secure processor the task scheduler en- 
forces these rules by loading the protection reg- 
isters with appropriate values. 

Tele implements a task scheduler on unsecure proces- 
sors like the 8080 and 8086 so that it presents the same 
environment regardless of processor. Eventually the bugs 
that result in programs running wild will be found and 
corrected. Provided that the program is not a saboteur, it 
will then run exactly the same on any processor support- 
ed by Tele. 


A Detailed Description 

The listings that accompany this article implement the 
task-scheduling kernel. You can enhance your applica- 
tions by incorporating these functions into MS-DOS. An ini- 
tiation function alters the 8086 interrupt vector and re- 
programs the system clock to support Tele. This is done 
without damaging MS-DOS, which remains in memory 
and is available for use as a file system and other pur- 
poses. A termination function removes Tele and restores 
MS-DOS completely. 

Function t__krnl in Listing One, page 50, is the security 
kernel. This program is an infinite loop. It determines the 
next task to be executed and passes control to it. The task 
will eventually be interrupted by the system tick clock 
and control will return to t__krnl. The terminated task is 
then stored in an appropriate queue, and the loop re- 
peats. 

Listings Two through Four are presented as supple- 
ments to Listing One. Listing Two, page 58, contains sever- 
al macros used with the assembly-language functions; 
Listing Three, page 61, contains various assembly-lan- 
guage subroutines that are intended to support Listing 
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?One; and Listing Four, 
page 66, contains addi- 
tional assembly-language 
programs that deal with tim- 
ing concerns. 


Scheduling 

Tele uses a scheduling algorithm that supports real-time 
processing as well as preemptive multitasking. Much of 
the system code executes as independent tasks. Also, the 
hardware device drivers are fully interrupt-driven. 
These features make the task scheduler and its associated 
functions intricate. The end result is efficient processing 
of several types of tasks. 

Figure 1, page 18, illustrates the scheduling queues ma- 
nipulated by the task scheduler. The current state of a 
task is equivalent to the queue in which it resides. The 
execution queue (X) contains tasks ready for execution. 
The wait queue (W) contains tasks waiting for a particular 
(real) time to execute. The priority queue (P) is actually a 
group of queues used to sort tasks by priority. Also shown 
in Figure 1 is the pointer to the currently executing task 
(C). The listings contain a symbol, —tsk, that locates the 
control table for the current task. 

All tasks are represented by a t_task structure, which is 
defined in Listings One and Two. The t_ftask structure 
contains t_task as well as several additional fields. Appli- 
cation tasks are represented by t_ftasks; they may have 
private memory areas and files assigned to them. Internal 
system tasks only use t_task to conserve space—they all 
share memory and files private to the system. 

A task is said to be in a particular queue if the linkage 
pointers in the task’s t_task structure are linked in the 
queue. Therefore managing tasks amounts to manipulat- 
ing the linkage pointers in the t_task structure. The securi- 
ty kernel is a state machine. It implements rules for chang- 
ing the states of tasks by changing the queue linkages. 
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MULTITASKING KERNEL 
(continued from page 17) 


Tele uses a fixed execution interval—that is, a periodic 
interrupt is used to divide time into equal intervals. Each 
interrupt marks the end of an application task execution 
interval. Higher priority tasks are allowed to execute 
more often, but all tasks are equal in being allowed to 
execute for one interval at a time. Another way of imple- 
menting priorities is to vary the execution interval, allow- 
ing higher priority tasks to execute for longer each time. I 
had to use the fixed-period method because a standard PC 
has only one programmable interrupt available. 

The interrupt is generated by an 8253 clock/timer cir- 
cuit attached to an 8259 interrupt controller. The 8253 
provides three programmable timers: one of these is used 
torefresh memory (Tele makes use of this for high-resolu- 
tion timing, as explained later), another generates the sig- 
nal used for the operator alarm speaker, and the third 
timer can be used to interrupt the processor. 

Tele actually requires three interrupts. One is necessary 
to measure time and maintain a time-of-day clock. Anoth- 
er is needed to update the console display. The display 
driver Tele uses is six times more efficient than the stan- 
dard BIOS, besides supporting window overlays. The dis- 
play driver is relevant here only because it requires a peri- 
odic interrupt synchronized to the display hardware. The 
third interrupt required is to preempt application tasks. 
Fortunately, it is possible to serve all three functions with a 
single interrupt provided it has a fixed period (which must 


Figure 1: Task-scheduling state machine 
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be harmonically related to the display hardware). 

Function t__tick in Listing Four services the system tick 
interrupt. Because bad things happen if it does not com- 
plete executing before the next interrupt, an interlock is 
provided to ignore subsequent interrupts until the first is 
complete. This is a protection that should only be needed 
in debugging, but it costs little time and those bad things 
that happen involve corrupting the stack and making the 
processor run wild. 

After preventing reentrance, the current application 
task execution interval is terminated by storing OxFF in 
the system variable t_astrm. Then the system state is en- 
tered, as explained later. The next step is to save the com- 
plete machine state of the interrupted task. The state is 
saved on the task stack, and then a special system stack is 
made current. 

Tele measures the execution time of all tasks to a high 
resolution. This is described in detail later but is accom- 
plished by a call to function t_rtmark immediately after 
storing the application machine state. All processor cy- 
cles until the next call to t_rtmark will be counted and 
accumulated under an internal task. 

The initial operations take a small, fixed amount of time 
so that control reaches the fourth step in synchrony with 
the console display hardware. Function w__cdspl is 
called just as the vertical blanking interval begins so that 
the display can be updated rapidly without any interfer- 
ence appearing on the screen. The display update can last 
almost 4 milliseconds under some conditions. When the 
tick clock has a frequency higher than that of the display, 


t_clndr 
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S computers comes anew 
kind of computer language: 


‘The most advanced, most “The ST’s readily apparent 
powerful microcomputer strong point is speed. Com- 
your money can buy.” e 


—Creative Computing 


‘‘The best hardware value of the year.” 
—Infoworld 


‘“We have spent the last three months 
evaluating the Atari and have come to the 
conclusion that it can’t be beat as a 
low-cost telecommunications terminal, 
drafting workstation, or for quick graphics 
visualization.” —Microtimes 


‘“We are most impressed with the clarity 
of the graphics, with the speed of the disk 
I/O (input/output), and with the ST’s 
value.” —Byte Magazine 


‘With the impressive ST, Atari has 
delivered on its promise of power without 
the price.” —Family Computing 


‘Faster and with better graphics capabili- 
ties than an IBM”*/AT™, it could be a great 
vehicle for low-cost networks, desktop 
publishing and visual database manage- 
ment software.’ © —Microtimes 










“All of the displays are clear, sharp, 
readable, and flicker free. We 
were particularly impressed by 
the clarity of the high-resolution 
monochrome.” 

—Byte Magazine 


pared to the Macintosh”, 
working with the ST is extraordinary.” 
—John Dvorak, San Francisco Examiner 


‘Since the pinouts are standard, it is also 
possible for various software packages 
to support an even wider range of output 
devices—even faster printers and high- 
end plotters.” —Microtimes 


‘The ST is noticeably faster than the 
Macintosh, not only because of the faster 
clock rate but because it has a faster 

disk drive.” —Personal Computing 


‘The ST is an amazing bargain, much 
more of a computer ‘for the rest of us’ 
than Mac ever was.” —Byte Magazine 


‘From here on you had better think of Atari 
as a major player in the computer game.” 
—Jerry Pournelle, Infoworld 


The 520ST™ with 512K of memory is 
under $800. The 1040ST™ with a full mega- 
byte is under $1,000. No wonder the experts 
are impressed. 


for yourself, see your Atari dealer. 
For the one nearest you, 
call I 800 443 8020. 
9:00 AM-5:00 PM ) x 





Technology So Advanced, It’s Affordable. 


Atari, ST, 520ST and 1040ST are trademarks or registered trademarks of AtariCorporation. 
IBM and AT are trademarks or registered trademarks of International Business Machines Corporation. Macintosh is a trademark licensed to Apple Computer, Inc. 
© 1986 Atari Corporation 


Circle no. 339 on reader service card. 


Dr. Dobb’s Journal, December 1986 


To experience the ST excitement 


Monday-Friday 
~ PacificTine. ATART 


19 


MULTITASKING KERNEL 
(continued from page 18) 


say 120 Hz, w__cdspIl is not called on each interrupt. Be- 
cause w__cdspl recieves control about 60 times each sec- 
ond, for a 120-Hz tick clock, half the interrupts bypass the 
display update. 

The next step is to maintain the time-of-day clock. Tele 
provides the current time of day to application programs 
in an ASCII character string accurate to 0.05 second. The 
tick frequency is nearly a multiple of this but not exactly, 
so t__tick maintains a series of counters to skip some ticks 
and duplicate others. The end result is that the long-term 
average is very nearly 20 Hz. The time-of-day clock is 
intended to present the time to the operator and to time- 
stamp operations (it looks fast to a human being). 

To simplify developing Tele under MS-DOS, I also main- 
tain the standard BIOS time-of-day interrupt. The BIOS pro- 
grams the tick clock to produce an 18.2-Hz interrupt. Tele 
uses some additional counters to derive this frequency 
from its 20-Hz clock. The standard BIOS procedure is 
maintained by relocating its interrupt vector before 
t___tick is installed to service the tick clock. The alternate 
interrupt is then invoked at the appropriate times to 
maintain a long-term average of 18.2 interrupts per sec- 
ond. Notice that at any particular instant the clocks can be 


sys_entr macro 





flagssys_ilck 





sys_ilck<-OxFF 


Protected 


Processing 





Figure 2: System state function 
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off by several milliseconds—it is only the long-term 
(greater than 1 second) averages that are correct. 

Finally t__tick is ready to terminate the current appli- 
cation task execution interval and return control to 
t__krnl. These other operations may seem complicated, 
but they execute very quickly and have no side effects. No 
problems will develop by ignoring the first several steps 
and assuming that control, in response to a tick interrupt, 
goes immediately to label tick3. 

First, t_rtmark is again called to resume counting pro- 
cessor cycles for the interrupted task. Then t__tick de- 
cides whether to resume the interrupted task or to pass 
control back to t__krnl. Some tasks must not be interrupt- 
ed—for instance, a system program might be rearranging 
the linkage between tasks. If control were to return to the 
task scheduler before the linkage was fully corrected, 
pointers could get lost and bad things happen. One way to 
prevent this would be to disable interrupts, but that 
would impinge on the device drivers. In fact, it is impor- 
tant to make all times that interrupts are disabled as short 
as possible. The time required to update the task queue 
linkages is much too long. 


Execution States 
Tele solves this problem by defining two execution states: 
application and system. A program enters the system 


sys__exit 


macro 





call t_term 


Exit 
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C Programmers! 
High-Speed Database tames 
complex C applications 


“db_ VISTA™ lets you easily build complex databases with many interconnected record types...” 
Dave Schmitt, President, Lattice, Inc. 


H igh-Speed data retrieval and access... 

just two benefits of using RAIMA’s network 
model DBMS, db_ VISTA. Combine these 
design benefits with those of C—speed, 
portability, Sn and you begin to 
understand db__VISTA’s real measure... 
performance. 


Independent Benchmark proves 
High-Speed model 2.76 times faster 


An independent developer bench- 
marked db_VISTA against a leading 
competitor. Eleven key retrieval tests were 
executed with sequentially and randomly 
created key files. 


*Result of 11 Key Retrieval Tests 


db_ VISTA :671.24 seconds 
Leading Competitor :1,856.43 seconds 


db_ VISTA's high-speed network database 
model lets you precisely define relation- 
ships to minimize redundant data. Only 
those functions necessary for operation are 


Royalty-Free Run-Time 


Whether you're developing applications 
for a few customers, or for thousands, the 
price of db_ VISTA or db__ QUERY is the 
same. If you are currently paying royalties 
for a competitor’s database, consider 
switching to db__VISTA and say goodbye to 
royalties. 


FREE Technical Support 
For 60 days 
Raima’s software includes free telephone 
support and software updates for 60 days. 
Technical support personnel are available 


to answer questions about our software or 
yours. 


30-Day Money-Back Guarantee 


Try db_ VISTA for 30 days and if not fully 
satisfied, return it for a full refund. 


Order Schedule 
db_VISTA db QUERY 


db_VISTA Version 2.2 


Database Record and File Sizes 

¢ Maximum record length limited only 
by accessible RAM 

¢ Maximum records per file is 16,777,215 

¢ No limit on number of records or set 
types 

¢ Maximum file size limited only by 
available disk storage 

¢ Maximum of 255 index and data files 


Keys and Sets 
¢ Key length maximum 246 bytes 
¢ No limit on maximum number of key 
fields per record—any or all fields may 
be bs with the option of making 
each key unique or duplicate 


¢ No limit on maximum number of 
fields per record, sets per database, or 
sort fields per set 

¢ No limit on maximum number of 
member record types per set 
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applications for micros, minis, or main- 
frames...db_ VISTA is for you. 


How db_ VISTA works... 


Design your database and compile your 
schema file with the database definition 
language processor. Develop application 

rograms, making calls to db_VISTA’s C 
unctions. Edit and review your database 
using the Interactive Database Access 
utility. Compile and link your C program 
with the db_ VISTA runtime library, and 
your application is ready to run. 


Multi-user and LAN capability 


Information often needs to be shared. 
db_ VISTA has multi-user capability and 
supports simultaneous users in either 
multi-tasking or local area networking 
environments, allowing the same C appli- 
cations to run under UNIX, MS-DOS, and 
VAX VMS. 


db _QUERY™ lets you ask more 
of your database 


db__QUERY is a linkable, royalty-free, 
SQL-based ad hoc query and report writing 
facility. It provides a user-friendly rela- 
tional view of a network-model database. 
Use it directly or design an interface for the 
inexperienced to generate powerful queries 
and reports. 


RAIMA’ 
CORPORATION 


High-Speed Programming Tools, 
Designed for Portability 


Information Line . 1-206-828-4636 


ak. 
Read what others say... 


“If you are looking for a sophisticated C 
programmer's database, db_ VISTA is it. In 
either a single or multi-user environment, 
db_ VISTA lets you easily build complex 
databases with many interconnected record 
types. The multi-user implementation 
handles data efficiently with a LAN, and 
Raima’s customer support and documen- 
tation are excellent. Source code availabil- 
ity and a royalty-free run-time is a big plus.’ 

Dave Schmitt, President 
Lattice, Inc. 


‘‘My team has developed a sophisticated 
PC-based electronic mail application for 
resale to HP customers. db_ VISTA has 
proved to be an all-round high performer 
in terms of fast execution, flexibility and 
portability, and has undoubtedly saved us 
much time and development effort:’ 
John Adelus, Hewlett-Packard Ltd. 
Office Productivity Division 
‘On the whole, I have found db_ VISTA easy 
to use, very fast with a key find, and 
powerful enough for any DBMS use I can 
imagine on a microcomputer:’ 


Michael Wilson, Computer Language 
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run on local area networks 

¢ File structure is based on the B-tree | 
indexing method and the network 
database model 

¢ Run-time size, variable—will run in as 
little as 64K, recommended RAM size 
is 256K 

¢ Transaction processing assures 
multi-user database consistency 

¢ File locking support provides read 
and write locks on shared databases > 

¢ SQL-based db__ QUERY is linkable | 

¢ File transfer utilities included for 
ASCII, dBASE optional 


Utilities 
+ Database definition language processor 
¢ Interactive database access utility 
¢ Database consistency check utility 
¢ Database initialization utility 
¢ Multi-user file locks clear utility 
¢ Key file build utility 
¢ Data field alignment check utility 
¢ Database dictionary print utility 
¢ Key file dump utility 
¢ ASCII file import and export utility 





*The benchmark procedure was adapted from 
‘“‘Benchmarking Database Systems: A Systematic 
Approach”’ by Bitton, DeWitt and Turbyfill, 
December 1983. 
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state when it must be allowed to finish an operation be- 
fore it is preempted. This is something like disabling in- 
terrupts, but the interrupt hardware remains fully func- 
tional and enabled. In the application state, a task may be 
preempted and not resumed for an indefinite period. I 
call the special state system to emphasize that it must not 
be entered lightly. Programs that enter it must be de- 
bugged and be sure to exit from the system state at their 
earliest opportunity. Figure 2, page 20, is a flowchart of a 
program that enters the system state. 

The system state is entered with the sys_entr macro 
(see Listing Two). OxFF is stored in the system variable 
sys_ilck with a locked exchange instruction. The lock en- 
sures that OxFF is stored and the orginal contents are load- 
ed without any intervening bus cycles. Therefore it will 
work even if multiple processors are accessing a common 
memory. Whenever sys_ilck contains OxFF, the current 
program is in the system state. When it contains 0x00, the 
program is in the application state. The sys_entr macro 
stores OxFF in sys_ilck and stores the original contents of 
sys_ilck in a local flag. 

After the protected operation is complete, the sys_exit 
macro is used to exit from the system state. The tick ser- 
vice function, t__tick, uses the sys_entr macro but does 
not use sys_exit. All other functions that execute in the 
system state use both macros. 


In the sys_exit macro, variable t_astrm is examined 
first. If it contains 0x00, the current execution interval has 
not terminated and control returns normally. If t_astrm 
contains OxFF, the current application has been preempt- 
ed while it was in the system state. Instead of returning 
control to the calling program, sys_exit examines the orig- 
inal sys_ilck value. If sys_ilck contained 0x00, the current 
task is terminated by calling function t_term (Listing 
Three). But if both t_astrm and sys_ilck contain OxFF, the 
function calling the current one (where sys_exit is being 
processed) was already in the system state. Again control 
returns to the calling program. This scheme allows pro- 
grams to be nested in the system state. Eventually control 
will return to the first program to enter the system state. At 
that time the t_astrm variable controls processing. 

Function t__tick is slightly different. One difference is 
because t__tick is the only function to set t_astrm to OxFF. 
T_astrm is set to 0x00 when an application task is initially 
dispatched. It is set to OxFF when the tick interrupt occurs. 

The other difference involves the stack. Every task has 
its own stack—at least one. The task scheduler also has its 
own private stack. Function t__tick saves the interrupted 
machine state on the application stack and then establish- 
es the system stack—that is, the stack private to t__krnl. 
The system stack is then used for all subsequent process- 
ing within t__tick. 

When control is ready to exit from t__tick, only the 
value of sys_ilck at the time of the interrupt need be 
examined (t_astrm is always set by this time). If it was 


WINDOWS FOR DATA" 
DATA ENTRY WINDOWS MENUS' HELP 


Windows for Data does the hard jobs 
that others can't — we guarantee it. 
Makes standard display and entry tasks 
easy. Reliable. Compact. Portable. 


DATA ENTRY: The most complete and 
flexible data entry system on the market. 
Pop-up data-entry windows; field types for 
all C data types, plus decimals, dates, and 
times; auto conversion to and from strings 
for all field types; system and user-supplied 
validation functions; range-checking; 
scrollable context-sensitive help; required 
and must-fill fields; programmer-definable 
edit keys, field types, and field masks. Read 
field by field or auto-read all fields. Branch 
and nest window forms. Virtually every 
capability of WFD can be modified 


UNPRECEDENTED FLEXIBILITY 


As many possibilities as Vermont in June. 


MENUS: Build multi-level menus in the 


UNIX, DOS, OR BOTH 
WFC and WFD provide source code com- 
patibility between PCDOS and UNIX. 


OUR CHALLENGE AND 
GUARANTEE 


If you have an application where no 


other tool can do the job, try Windows 
for Data. If it doesn’t help you solve 
your problem, RETURN FOR A FULL 
REFUND. YOU MUST BE SATISFIED. 





WINDOWS WINDOWS 
FOR DATA FORC 
$295 $195 
XENIX-286 $595 $395 
UNIX CALL CALL 


PC DOS* 


to meet special needs. 


WINDOWS: WED is built upon and in- 
cludes Windows for C, the windowing 
system rated #1 in PC Tech Journal 
(William Hunt, July 1985). WFC now has 
more features than ever, including auto- 
matic full compatibility with Microsoft 
Windows and TopView. 
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format of Lotus 1-2-3, Macintosh, or a style 
of your own choosing. 


HELP: Build context-sensitive or menu- 
driven help systems. Display text in pop-up, 
scrollable windows. 


Circle no. 157 on reader service card. 


Call for FREE Demo diskette. 
“All popular C compilers; no royalties. 


21 Elm Ave. 
Richford, VT 05476 


Creative §02-848-7738, 
are oxt. 31. 


MasterCard & Visa Accepted. Shipping $3.50 
VT residents add 4% tax. 


Vermont 
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C spoken here... Pascal spoken here... 
High C™ Professional Pascal™ 


He you want to use a C compiler that Do you want to use a Pascal compiler that 
was chosen by Ashton-Tate for dBASE Ill® Plus, and e was chosen by Lifetree Software, Inc., for implementing 
CAD Leader AutoDesk for AUTOCAD and AUTOSKETCH Volkswriter Deluxe™ 
“with a twenty percent code savings over Lattice C.”’ e serves as a systems and applications language at 
¢ was well rated in Computer Language, Feb. 86: CAD/CAM giant Daisy Systems Corporation 
‘‘Then there is High C, the most powerful compiler of all..." © was well rated in Computer Language, May 86: ‘‘The 
and Dr. Dobbs Journal, August 86 clear choice for large-scale programming projects...’’; 
e “would have saved me three weeks of porting time had | and PC Tech Journal, July 86: ‘‘for team programming 
had High C instead of Microsoft’s new C’’ or for very large projects...stands absolutely alone.”’ 
Mike LeBlanc, compiler developer, Sky Computers pg. 126 “documentation is certainly the best...a model of 
e “is the only C compiler for the IBM PC capable of com- technical clarity.” pg. 112. 
piling NYU’s Ada/Ed compiler’ e is the ‘howitzer’ of Pascals and ‘“‘could well be the most 
Dave Shields, research scientist, New York Univ. powerful Pascal compiler ever implemented on a 
e has a complete run-time library microcomputer’’ PC Magazine, Oct. 29, 1985, p. 144 
e has structure assignment, enum, void... e has 8-, 16-, and 32-bit integers; sets up to 64K bits 
e supports nested functions as in Pascal e has varying-strings of up to 64K characters 
e supports pcc and full K&R C plus some latest, nifty ex- e has a full-fledged C macro preprocessor 
tensions from the new ANSI-proposed C standard e 


has many run-time library additions: UNIX™-like I/O, multi- 

e “is the highest quality C compiler for large-scale software ple heaps, interrupts,. . . 
development.’’ Randy Nielsen, Ansa (Paradox) has all the bit-pushing operators of C 

e “saved 15% of code over five large modules of MultiMate © has many more extensions, getting you half way to Ada® 
relative to Lattice C”’ for a non-Ada price 
David Beauchesne, Multimate International 





Power Tools Power Users 


Each compiler ¢ generates superb code, with optimizations such as common-subexpression elimination and cross-jumping © sports 
no less than five memory models for the 8086 (Small, Compact, Medium, Big, and Large) ¢ supports a unique implementation of register 
variables ¢ supports the 8087/80287 in native mode, or emulates © supplies three floating-point formats * generates special instructions 
for the 80186/286 © generates code that runs in 80286 protected mode ¢ gives you hundreds of error and warning messages, help- 
ing you find those subtle bugs before you need a debugger’s help e lets you overlay data as well as code (when used with PLINK86), 
for substantial space savings ¢ lets you write interrupt routines directly in high-level language ® lets you get “‘close to the machine” 
with built-in move/scan/compare operations ¢ is supported by equivalent resident and cross compilers for the 80286 (UNIX V.2, Xenix, 
Concurrent DOS 286), 80386 (DOS, UNIX V.3), 68010/20/68881 (UNIX V & 4.2, GEM-DOS™), 32032 (UNIX 4.2), VAX (UNIX 4.2, 
VMS), RT PC, IBM 370,... © contains a multi-modular cross-referencer ¢ produces ROM-able code for embedded applications 
e can talk to those other languages by those other vendors © gives you 64K run-time stack space that can be shared with 
the heap ¢ is endowed with an amazing number of pragmas (compiler controls) for customization to your application ¢ has 
a compiler start-up profile ¢ supports direct access to MS-DOS; library supports DOS 3.X file-sharing ¢ generates symbolic debugger 
information for use with all Known MS-DOS debuggers ¢ allows exec-ing subprocesses ® was designed for professional software 
developers, not hobbyists ¢ comes with great technical support by a company that specializes in compilers ¢ comes with exten- 
sive typeset documentation ¢ and more... call or write for your information packet today... 


for 


Not recommended for casual use, but for applications needing industrial-strength tools, contact 


Abroad: 

ABC Software, The Netherlands 
Microsoftware, Tokyo 

Grey Matter, United Kingdom 


INCORPORATED Buchdata, Frankfurt 
903 Pacific Avenue, Suite 201, Santa Cruz, CA 95060-4429 
(408) 429-6382 (429-META), TELEX: 493-0879 





Professional Tools Since 1979 


High C V1.3: $495 —on any MS/PC-DOS system— Professional Pascal V2.6: $595 
OEMs: Contact us about porting our professional compilers to your systems. 
TWS: Professional Compiler Developers and competitors, ask about our Translator Writing 


System compiler toolbox; see the review in Computer Language, December, 1985. 
DOS Helper™: Powerful UNIX-like utilities to enhance MS-DOS, for $49.95—included free with 
MetaWare compilers: FIND, TAIL, MV, LS, CAT, UNIQ, FGREP, and WC. 
C Validation Suite: Used by some of our competitors and many others. $2,000/Plant Site 


e MetaWare, High C, Professional Pascal, and DOS Helper are trademarks of MetaWare Incorporated ¢ Other trademarks and their owners are: UNIX—AT&T, dBASE 
\lli—Ashton-Tate, Volkswriter Deluxe—Lifetree Software, GEM-DOS—Digital Research, Ada-DoD. © 1986 MetaWare Incorporated. 
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MULTITASKING KERNEL 
(continued from page 22) 


0x00, control simply returns into the system stack. But if 
sys_ilck contained OxFF at the time the tick interrupt oc- 
curred, the task was in the system state and should not be 
preempted. In this case, t__tick restores the original stack 
and returns into it, thereby resuming the interrupted 
task. That task will then finish whatever operation re- 
quired system state protection and will eventually exe- 
cute a sys_exit macro, causing control to enter function 
t_term. 

Figure 1 shows the task queues and the paths along 
which tasks are moved from one queue to another. The 
paths are labeled according to the function that performs 
the transfer. Function t_term is shown moving the cur- 
rent task to the priority queue (from C to P). T__tick per- 
forms this same function. 

Closely related to function t_term are functions t_rels, 
t_spnd, and t_wait. All these functions call another, 





Figure 3: Task switcher 
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t__trmap, to terminate the current application task. This 
is done by first storing the current machine state on the 
application stack. Then control enters function t__sstk to 
establish the system stack (the stack used by t__krnll). 
T__sstk exits by returning to the caller of t__trmap. 

The difference between t_term, t_spnd, t_wait, and 
t_rels is in the value they return. Because t__stck has 
changed the stack, they return into the system stack, not 
the stack they were called with. Their return codes are 
ultimately presented to t__krnl and determine the path 
that the task will follow away from queue C in Figure 1. 

Function t_term returns a code of 0 and causes the task 
to be returned to the priority queues, P. There it will 
compete, on the basis of priority, with other tasks to be 
returned to the execution queue, X. Function t_rels re- 
turns a code of —1, which causes the task to be returned 
to the bottom of the execution queue. 

T_spnd returns a positive return code between 1 and 
32,767. This number indicates the number of ticks for 
which the task will be suspended. That is, if the return 
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value is 12 and the tick frequency is 120 Hz, the task will 
be suspended for 1/10 second. T_wait is a combination; it 
first calls t_spnd and then calls t_rels. Therefore t_spnd 
suspends the task for a time, after which the task is placed 
at the top of the execution queue. T_wait suspends the 
task but restores it to the bottom of the queue. 

Tele therefore has a real-time scheduling capability 
based on the frequency of the tick clock. The resolution is 
not adequate for many applications but is sufficient for 
times relevant to the human operator. For example, an 
alarm can be sounded by beeping the speaker, and the 
duration of the beep is measured by the tick clock using 
function t_spnd. The standard BIOS enters an idle loop that 
literally wastes time to measure the beep’s duration, but 
Tele is able to continue doing other work. Similarly, many 
Tele drivers utilize special tasks and t_spnd to implement 
time-outs and thereby detect unresponsive equipment. 


Looping 

T_krnl processes the return codes from t_term and its 
associated functions. T__krnl is an infinite loop—once 
control enters, it never leaves except by calling applica- 
tion tasks. The application tasks eventually return to 
t__krnl and control continues to loop. Figure 3, page 24, 
shows the flowchart for t__krnl. 

At the beginning of the loop t_astrm is examined. If it 
contains 0x00, no tick interrupt has occurred. Otherwise 
it will contain OxFF, and function t__wtst is called. 
T__witst will examine the wait queue (W) and move all 
tasks scheduled to be executed at the current system tick 
to the top of the execution queue. Then the execution 
queue is examined. If it is not empty, the task on top is 
made current; it is moved from X to C as shown in Figure 
1. If the execution queue is empty, t__krnl will keep loop- 
ing. Eventually a task will appear in the execution queue, 
and it will be executed. 

Tasks are actually executed by calling function t__xtsk. 
T_xtsk first calls t_rtmark to stop accumulating proces- 
sor cycles to the task scheduler. It then calls function 
t___.dspap, which is the converse of function t__trmap. It 
restores an application stack and then loads the machine 
registers from it. Control will exit from t__dspap to the 
point following an earlier call to t__trmap, and the appli- 
cation will run until it terminates (or is terminated). 

Control will then return to the point following the call 
to t__dspap in function t__xtsk. The return code set by 
t_term and its associated functions is then presented to 
t__xtsk, which passes it back to t__krnl when t__xtsk 
returns. Before returning, t__xtsk again calls t__rtmark. 
This time the call causes subsequent processor cycles to 
be accumulated to the task scheduler. 

T__xtsk is able to determine the actual execution time 
of the application task. This can be much less than a full 
system tick interval if the application was interrupted 
many times. If the true execution time is less than a cer- 
tain threshold, t__xtsk immediately executes the task 
again. This is done only if the task was preempted. If the 
task terminated itself (by calling t_spnd, t_rels, or t_wait), 
no check of execution time is made. 

If the task had a fair chance at the processor, or termi- 
nated itself, control returns from t___xtsk to t___krnl. Now 
the return code established by t_term and the others is 
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examined. If the return is less than 0, function t__inxq is 
called to move the task to the bottom of the execution 
queue. If the return is 0, function t__inpg is called to move 
the task to the priority queues. Otherwise function 
t__inwg is called to insert the task into the wait queue. 
That completes the task scheduler loop, which is often 
called a monitor or supervisor cycle in other operating 
systems. 


Multitasking System Techniques 

Tele uses its central task-scheduling algorithm to support 
other features. Figure 1 indicates that function t__sch 
moves tasks from the priority queue to the bottom of the 
execution queue. This function is not called by any other 
task. It is placed in the execution queue when the system 
is initialized. When it executes, it enters the system state 
and processes the priority queues, taking tasks from P to 
the bottom of X. It places itself at the bottom of the execu- 
tion queue last. Therefore, when all the tasks it has sched- 
uled have been run, it will run again itself in order to 
schedule more. 

It is easy to extend this concept to several versions of 
t__sch, each operating on a different set of priority 
queues. Some IBM mainframe operating systems obtain a 
similar effect with programs called initiators. 

A similar function is t__clndr, which lives in the wait 
queue. It provides for long-term calendar functions by 
periodically executing and then rescheduling itself in the 
wait queue. As shown in Figure 1, the wait queue ac- 
counts for a short time—about 30,000 ticks. At a 120-Hz 
tick clock rate, this is about 4.5 minutes. T___clndr exe- 
cutes once every minute. It examines an extended calen- 
dar file on disk, and as the time to execute programs 
nears, it creates tasks in the wait queue. 


High-Resolution Clock 

Tele measures the execution time of every application 
task. It also measures the amount of time spent processing 
the system tick interrupt and scheduling the next task. 
This is done with a resolution of 15 microseconds. 

A standard IBM PC uses one channel of an 8257 DMA 
(direct memory access) controller to refresh dynamic 
memory. Dynamic memory chips are based on leaky ca- 
pacitors, which means they must be read periodically in 
order to maintain their contents (when read, the chip 
automatically recharges its capacitors). Most dynamic 
memory chips can be properly refreshed by reading 128 
consecutive addresses every 2 milliseconds. Most PCs do 
this by programming one channel of the same 8253 
counter to produce a signal with a 15-microsecond peri- 
od. This signal then requests the DMA controller to read 
the memory. Special circuitry causes all memory chips to 
be read at once (the data read is ignored). The DMA con- 
troller automatically increments its address after each 
request. 

The processor can read the current address in the DMA 
controller at any time. Because the refresh circuitry runs 
continuously from the time the computer is powered up, 
the current address is a convenient high-resolution clock. 

In standard PCs, the processor clock and 8253 clock are 
both derived from the same crystal. They therefore main- 
tain a constant phase difference. When the tick clock is 
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MULTITASKING KERNEL 
(continued from page 25) 


started, the current reading of the high-resolution clock is 
saved. This allows programs to relate the high-resolution 
clock to the current time of day and make absolute time 
measurements to within 15 microseconds. 

Tele itself only uses the high-resolution clock to count 
processor cycles. A refresh cycle is 72 processor cycles on 
a 4.77-MHz processor—it is more on faster ones. There- 
fore the number of processor cycles measured can vary 
from run to run. The count tends to become more accu- 
rate as longer runs are measured. 

Function t_rtmark (Listing Four) is provided to read the 
high-resolution clock. It keeps track of the previous read- 
ing so that each time it is called it accumulates the interval 
just terminated toward some task. Tele mostly measures 
execution time to document its actions. This data is useful 
in tuning the system and diagnosing some application 
problems. The only regular use made of it is in rerunning 
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| help if 
| together from scratch. 


tasks that get short execution intervals because of heavy 
interrupt service. 


Installation 

Tele is designed to be a collection of programmers’ tools. 
The listings with this article are suitable for inclusion 
with small-memory-model C programs. To make them 
work, you must assemble and compile them into a li- 
brary. Then you can reference these functions from your 
own programs. 

I developed the code using the Lattice C compiler, Ver- 
sion 2, and Microsoft MASM assembler, Version 1. I later 
upgraded to Versions 3 and 4 and had to make minor 
changes. If you use Lattice C, Version 3, you should in- 
clude the switches —w —cc in the LC1 command line. 
This specifies word alignment of variables and nested 
comments. If you use another compiler, you must ensure 
these conditions and may have to make other changes as 
well. The assembly-language programs contain macros 
(pseg, endps, dseg, and endds) defined with the Lattice 
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compiler. These macros define the proper segment struc- 
ture for linking with the C modules. 

Installation is accomplished by calling function t__init 
(Listing One). When control returns, your program will 
be executing as a single task, and others may be executed 
at the same time. You can create additional tasks by call- 
ing function t_crt. They can be destroyed by calling t_del. 
See Listing One for the calling procedures. 

It’s important to call function t__term before returning 
to MS-DOS. If you don’t, an interrupt vector will be left 
pointing into the transient program area. It is likely that a 
hard crash will result the next time a program is loaded 
unless you call function t__term to restore the original 


vector. 
The last part of Listing One contains a main function. 


This tests the task scheduler by creating two subtasks. 
Each subtask continually increments a counter, and the 
program displays the current values on the display. 
Though main( )and count( ) are not part of the task sched- 
uler, they do serve as an example of its use. 
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Conclusion 


Tele’s task scheduler actively participates in the execu- 
tion of every task, but it is almost always transparent. 
Most tasks can assume they are running under a single- 
tasking system. They can take advantage of services asso- 
ciated with multitasking, such as intertask communica- 
tion, without significantly altering their structure. 

An expanded version of this code is available from me 
for $100. It’s available as a programmer's tool and in- 
cludes full source code and precompiled libraries for all 
8086 memory models, more detailed documentation than 
is possible here, and diagnostic functions useful for de- 
bugging modifications. 

Further information is available from Berry Computer, 
P.O. Box 966, Jackson, CA 95642; (209) 223-0993. 


DDJ 


(Listings begin on page 50.) 
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Programmer's Paradise Gives You Superb Selection, 
Personal Service and Unbeatable Prices! 


Welcome to Paradise. The MS/PC-DOS software e Special orders— If you don’t see your product 
source that caters to your individual programming listed, call. 
needs. e 30 day money-back guarantee —We will refund 


iiseouer the Manis kduanbives of Prrcidive your money for products returned in fully resalable 
: : S os condition within 30 days of purchase. Please ask for 
e Lowest price guaranteed. details when placing an order. 


® Only the latest versions of all products. 


e Large inventory of popular products ready for 
immediate shipment. 


e Product evaluation literature available. 


How much extra would you expect to pay for all this 
special service? At Paradise, it’s yours for the asking. 
Call our toll free number— 1-800-445-7899. 

Our software pros are ready and waiting to help you. 
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ARTICLES 


In Search of a Sine 


was recently involved in a pro- 
J ject for which I needed to com- 


pute sines and cosines of angles | — 


on the NS320xx microprocessor with 
a floating-point coprocessor. I looked 


through several years’ worth of the | 
more erudite microcomputer maga- | 
zines (including, I must admit, DDJ), | — 

some mathematics and computer-sci- | 


ence textbooks, and the source code 
of some programs that included sine 
computation routines. Despite my 
searching, though, I was unable to 
find any useful algorithms for com- 
puting mathematical functions in 
general and sines in particular. I was 
looking for an algorithm explained in 
simple terms, along with a reason- 
ably well-commented program for 
carrying it out. 

I did find several potential answers, 
but for various reasons none of them 
were usable. Some of them were too 
vague or mathematically complicated 
for me to understand well enough to 
program them. Another was an un- 
commented program for the 8080 CPU 
in which the sine computation algo- 
rithm was obscured by the floating- 
point arithmetic routines. One was an 
uncommented program written in 
STOIC (a Forth-like, stack-oriented lan- 
guage) that was impossible to figure 
out well enough to recode it. Another 
involved exponentiation of e, which 
was computationally impossible for 
me. 


The Taylor Series 

I finally got the hints I needed from 
the Mathematical Tables section of 
the Handbook of Chemistry and Phys- 
ics from the Chemical Rubber Com- 
pany. There I found a Taylor series 
formula for the sine of an angle. The 
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by Richard A. Campbell 


computing 
mathematical 
functions. 







series can be expressed as: 
s = a—(a3/3!) + (a5/5!) — (a7/7)!). . . 


where a is the angle (in radians), s is 
the sine, and! is the operator for fac- 
torials (the factorial of an integer n is 
the product of n with all integers 
smaller than itself and greater than 
1). Because the factorials of relatively 
small numbers can be calculated easi- 
ly (for example, 4! = 2X34 = 24), 
this seemed like a simple enough al- 
gorithm. I coded it up in BASIC and 
tried it out by computing the sines of 
several angles, starting at 0° or radi- 
ans and comparing the results with 
the values in the Mathematical Ta- 
bles, which are printed to five deci- 
mal places. 

It became obvious that it was com- 
putationally faster to precompute co- 
efficients that included the value of 1 
divided by the factorial and the sign 
of the term. Thus, the series above 
became: 


s = a —(0.166666 X a?) 
+(0.00833333 XX a5) 
—(0.0001984127 X a7)... 


Working with this test program re- 
vealed that the number of terms 
needed to approach the accuracy of 


the five-place tables was dependent 
on the size of the angle. For angles up 
to 90°, five terms were needed 
(through a® divided by 9!). This 
seemed computationally reasonable. 
But to get up to 120°, seven terms 
were needed (through a? divided by 
13!). At this point I realized this ap- 
proach was not feasible because an 


| algorithm that can’t compute the 


sines of large angles is of little use. 


Quadrants of the Circle 

The way out of this dilemma is to 
consider the angles in quadrants by 
thinking of the sines starting at 0° 
and progressing around the circle. As 
the angle increases from 0° to 90°, 
the sines go up from 0 to +1. From 
there to 180°, the sines return to 0, 
pass down to —1 at 270°, and then 
return to 0 at 360°. Thus the sine of an 
angle between 90° and 180° is equal 
to the sine of 180° minus the angle. 
Table 1, page 31, shows a summary of 
all this. If the quadrant is determined, 
you need only be able to compute 
sines from 0° to 90° efficiently. 


Doing It in BASIC 

When I considered the quadrant phe- 
nomenon, the uncommented pro- 
grams I had discovered began to 
make more sense. One was particu- 
larly interesting because it seemed to 
involve only four coefficients. It’s in 
the STOIC floating-point-routine file 
(CP/M Users’ Group) and is credited to 
J. Sachs, 1977. Frankly, I’m not sure 
I've interpreted Sachs’ approach as 
intended, but the following does 
work. 

First, scale the incoming angle to 
quadrants such that an angle of 90° 
(1.570795 radians) is made to equal 1. 
If you're working in radians, this 
means dividing by 1.570795; if you're 
using degrees, divide by 90. Then, if 
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the scaled angle is greater than 4 
(360°), subtract 4 from it and repeat 
the comparison (and subtraction) un- 
til it’s less than 4. Then compare with 
3 (270°) and 1 (90°) and adjust as ap- 
propriate based on Table 1. 

Compute the sine approximation 
as: 


s = (C1 X a) + (C2 X a3) + (C3 X a5) 
+ (C4 X a”) 


where the coefficients are: 


C1 = 1.570795 

C2 = —0.645921 
C3 = 0.07948765 
C4 = —0.004362469 


Remember that the standard Taylor 
series approximation has the input 
angle expressed in radians; these are 
scaled to proportions of 90°. So the 
coefficients are the same as those of 
the standard series divided into 
1.570795 and raised to the appropri- 
ate power, rather than 1. For exam- 
ple, C2 is —1.570795 to the third 
power divided by 3! (approximately). 

The actual computation, in BASIC, is 
given in Table 2, page 32. Sines calcu- 
lated in this way will usually agree 
with the table values; some are off by 
1 on the fifth place. This seems like a 
tolerable error. Runs of 1,000 sines of 
angles from 0° to 100° in 0.1° steps 
indicate that each sine takes about 28 
milliseconds to compute on a 6-MHz 
NS16032 CPU. 

The above algorithm can be used 
for cosines simply by doing the scal- 
ing and then adding 1 (adding 90°, ac- 
tually), then computing the sine. 
Compute the tangent by computing 
sine and cosine and then dividing 
sine by cosine (checking for zero co- 
sine, of course.) 


Doing It in Assembler 

The NS320xx assembly-language rou- 
tine (Table 3, page 32) is about 210 
bytes long, including the coefficient 
constants and the temporary storage 
space. Runs calculating 10,000 func- 
tions of angles from 0° to 100° in 0.1° 
steps indicate that sines and cosines 
take 0.9 milliseconds to compute and 
tangents take 1.3 milliseconds on a 6- 
MHz 16032 CPU. The results, rounded 
to five decimal places, generally 
agree with the table values; occasion- 
ally errors of 1 in the fifth place occur 
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with sines and cosines. Tangent er- 
rors are slightly greater; sometimes 
errors of 2 in the fifth place happen. 

The binary values of the constants 
in the program were determined by 
setting BASIC variables equal to the 
desired numbers and then examin- 
ing the symbol table in memory with 
a debugging program. 


Reading the Listing 

The motion of arguments in NS320xx 
instructions is from left to right. The 
CPU and the coprocessor each have 
eight registers, numbered RO through 
R7. The instruction MOVBF 1,R1, for 


example, takes a byte-sized integer 1, 
converts it to floating-point format, 
and leaves it in coprocessor register 
(CPR) 1. DIVF R2,R3 divides the oper- 
and in CPR 3 by the operand in CPR 2 
and leaves the quotient in CPR 3. 

The instruction MOV.D 
0(RO)(/R6:D),SNTAB may need some 
explanation. The meaning may not 
be obvious because it involves an ad- 








sine of 0° to 90° = sine of angle 

sine of 90° to 180° = sine of 180°-angle 
sine of 180° to 270° = —sine of angle-180° 
sine of 270° to 360° = —sine of 360°-angle 





Table 1: Range reduction for SIN(x) 


PC/VI 


Full Screen Editor for MS-DOS (PC-DOS) 


Looking for an Ultra-Powerful Full-Screen editor for 
your MS-DOS or PC-DOS system? Are you looking for 
an editor FULLY COMPATIBLE with the UNIX*VI 
editor?Are you looking for an editor which not only runs 
on IBM-PC’s and compatibles, but ANY MS-DOS 
system? Are you looking for an editor which provides 
power and flexibility for both programming and text 
editing? If you are, then look no further because PC/VI 


IS HERE! 


The following is only a hint of the power behind PC/VI: 
English-like syntax in command mode, mnemonic control 
sequences in visual mode; full undo capability; deletions, 
changes and cursor positioning on character, word, line, 
sentence, paragraph or global basis; editing of files larger 
than available memory; powerful pattern matching capabil- 
ity for searches and substitutions; location marking; 
joining multiple lines; auto-indentation; word abbrevia- 
tions and MUCH, MUCH MORE! 


The PC/VI editor is available for IBM-PC’s and generic 
MS-DOS based systems for only $149. For more 


information call or write: 


Custom Software Systems 
P.O. Box 678 

Natick, MA 01760 
617-653-2555 


The UNIX community has been using the VI editor for 
years. Now you can run an implementation of the same 
editor under MS-DOS. Don’t miss out on the power of 


PC/VI! 


*UNIX is a trademark of AT&T Bell Laboratories. 
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COMPUTING SINES and/or index) and a coprocessor regis- | ly applicable to any CPU that is compa- 
(continued from page 31) ter in the same instruction often leads | rable to the NS320xx in power. 

i te A POE Oe AOL. 

dressing mode not available on most | in National Semiconductor’s docu- DDJ 
microprocessors: It performs a 32-bit | mentation. 


move from the address in RO plus The rest of the program is fairly Vote for your favorite feature/article. 
Circle Reader Service No. 3. 


zero indexed by (plus) the contents of | straightforward and should be direct- 
R6 multiplied by 4 (the length of the 
moved data) into SNTAB. Thus R6 con- APOW = AN: REMAN = SCALED ANGLE 
tains the entry number in SNTAB— SINE = AN X C1: REMC’SAS ABOVE | 

not a byte displacement but rather a APOW = APOW X AN: REM FIGURE AN *3 
double word displacement—and RO APOW = APOW X AN 

contains the base address of the table. SINE = SINE + APOW xX C2: REM ADD — 
Another possibly confusing instruc- sha - Sone : ie HE GRE AN» 
tion is MULF R5,SNTAB. In this case, | |" (agi SiN: POW G9 El Aba fea 
you might think it would be more ef- APOW = APOW X AN: REM FIGURE AN *7 
ficient to move the coefficient into a APOW =APOWXAN 

register rather than to use memory. I SINE = SINE + APOW X C4: REM ADD TERM 
had previously discovered, however, oe | 
that the use of CPU registers (address | Table 2: Polynomial approximation in BASIC 

















- Listing One: Computing sine, cosine — _ Move fi AS - 
*NS—S20XX assembDier . MOVBF 0,R3 
; Sine, cosine, & tangent routines - SinLp MOV.D ‘Bo oe muttipier 
. i. i. MULF R5, SNTAB- multange => 
ee. ua a noe — he ADDF SNTAB,R3__—;addtosine — 
- ———ri—™ MULF R1,R5 a nt2- 
DegScl MOVBF 902 ;Scale for degrees MULF R1,R5 - 
Soe — i — . oS -1,R6 ee do again till done 
DoScal DIVE R2,R3 —_—_ ;Now 90 degrees = 1.00 
DQuadr MOVBF 44 ~~ =A = 360 degrees ; Compute Tan(x) 
_ \MovBe ii ~~ =i = 90 degrees ; Tan(x) = Sin(x)/Cos(x) 
#$$j.\“Over 272 + +#+#+§:2= 180 | _ ss 
[Mover = 3f6 ~~ 8 - 270 a Ne gr 


a Sa eG 
CMPF  &3,R4 ;Is angle > 360 degrees’ woe eee 


BSR DQuadr a 
BSR DoSin sick 
MOVF AS70S 
MOVBF «sR 
ADDFF SNTEMP,R: 
BSR DQuadr 
BSR ‘DoSin 
_ MOVF R3,R2 
_ MOVF TOS.R 









"BETS SnSci3_—_goifless than 360 


SUBF——(‘<;s SRA RS ;else subtract 360. 
BRS oe. ___ ;do it again 
WPF AAS ~ : > 270? 
















scaled value in R3 © CMPE RO, Ro - 


angle, degrees inR3 _ 7 BNE.S ATanDv 
divide by 90 _ MOVF FNSM,R3 __ 
_ ser _ 
make angle plus 90 

28 ure quadrant 
in _—-;go do sine, return from it 





ATanDv _—iODIVF ee 
RET : 
/ . : sak through to. . . PIO2 BYTE ODBh,OFh,0C9h,3Fh -pi/2 = 


SNTEMP BLK.D 1 ‘temporary storage 


2 0. 07946765"X° 5. 6 004362460°x" 7 SNTAB BLK.D 1 ‘temp 
; these are in reverse order of use 


ADDR SNTAB, RO “get address of table BYTE OBh,OF3h,8Eh OBBh_ 70. 04362469 

- — MovaD 486 ~~ iintRe BYTE 6Ch,0CAh,0A2h,03Dh ;0.07948765 = 

-; Enter with table adces i in RO, # terms it R6 BYTE 14h,5Bh,25h,0BFh ;—0.645921 CT 
MOVE RORi ve angle in R1 ~~ BYTe ODOh,OFh,OC9h,3Fh 1.570795 








Table 3: Compintiae TAN(x) from SIN(x)/COS(x) 
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0 you believe s ing developments, 
Turbo Pascal like Blaise 
is a serious moO St out QO Computing’s 
programming new Turbo 


language and not Power Tools. 
just a toy? Would you like to e¢ In-depth articles on 
improve your skills and expanding your Turbo 
ha O Pascal programming 
skills—on topics like 
3D graphics, screen 


master the power and ease of 
2 utilities, and memory 
GS Cll, resident programs. 
e Applications 


Turbo Pascal 

programming? Then M&T 
developed by other Turbo 
users and public domain 


has a publication for you: 
Turbo Tech Report. 

Turbo Pascal software 
programs on disk. 


This bimonthly 
newsletter/disk 
publication is written in 

If you’re an expert Turbo 
Pascal programmer or a novice 
interested in expanding your Turbo 









Introducing Turbo Tech 
Report, the newsletter 
for Turbo Pascal 
programmers. 6 disks 
with 6 newsletters 

for $99 a year! 


the Dr. Dobb's Journal 
tradition, delivering 
high-quality technical 
reviews, in- 

depth articles, tips and tricks, 


and Turbo Pascal utilities, libraries, and skills, you need Turbo Tech Report. 
source code on disk. Editor Namir Clement Subscribe today at the special introductory 
Shammas is dedicated to bringing you the price of just $99—that’s 33% off the regular 
best in Turbo programming, insight, price of $150. 
commentary and gossip. To order by credit card, call toll free 1-800- 

Each valuable issue will include: 528-6050 ext. 4001 and ask for item 300. 

¢ Reviews of Turbo Pascal-related Or mail the attached coupon with your 
products. You’ll read about the latest payment to Turbo Tech Report, 501 
Turbo Pascal third party software Galveston Drive, Redwood City, CA 94063. 


Turbo Pascal is a trademark of Borland International Inc. 
Turbo Power Tools is a trademark of Blaise Computing Inc. 
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“How to protect your software 


by 





Inventor and 
entrepreneur, 
Dick Erett, 
explains his 
company’s 
view on the 
protection of intellectual 


property. 
cA even sophisticated 
software develop- 

ment companies and the 

trade press seem to be miss- 

ing or ignoring is this: 
Software protection must 
be understood to bea 
distinctively different 
concept from that com- 
monly referred to as 
copy protection. 


Fundamentally, software 
protection involves devising 
a method that prevents 
unauthorized use of a 
program, without restricting 
a legitimate user from 
making any number of 
additional copies or prevent- 
ing program operation via 
hard disk or LANs. 

Logic dictates that mag- 
netic media can no more 
protect itself from misuse 
than a padlock can lock itself. 

Software protection must 
reside outside the actual 
storage media. The technique 
can then be made as tamper 
proof as deemed necessary. 
If one is clever enough, 
patent law can be brought 
to bear on the method. 

Software protection is at 
a crossroads and the choices 
are Clear. You can give 
product away to a segment 





crucial point that 
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Hard Disk Installation : Simply copy ae disk 
to hard disk using DOS Command - Copy A:* C; 





the program diskette as you wish. 


Data Back-ups : Use normal back-up and restore 
commands, including backing up sub-directories containing 


program files. 






rogram Back-ups : You may make as many copies of 





Networks : This product may be 
vorks. Follow the same installation 
102 of this manual. The Block 
with the normal operation of any 


letting people copy it? 


By Dick Erett, President of Software Security 





GRITUGID IDB gh 








Soon all software installation procedures will be as straightforward as this. 
The only difference will be whether you include the option to steal your 


product or not. 


of the market, or take a 
stand against the theft of 
your intellectual property. 


“... giving your software 
away ts fine...’ 


We strongly believe that 
giving your software away 
is fine, if you make the 
decision to do so. However, 
if the public’s sense of ethics 
is determining company 
policy, then you are no 
longer in control. 


We have patented a device 
that protects your software 
while allowing unlimited 
archival copies and unin- 
hibited use of hard disks and 
LANs. The name of this 
product is The BLOCK™ 

The BLOCK is the only 
patented method we know 
of to protect your investment. 
It answers all the complaints 
of reasonable people con- 
cerning software protection. 


In reality, the only people 
who could object are those 
who would like the option 
of stealing your company’s 
product. 


‘“...eliminating the ratio- 
nale for copy-busting...”’ 


Since The BLOCK allows 
a user to make unlimited 
archival copies the rationale 
for copy-busting programs 
is eliminated. 

The BLOCK is fully pro- 
tected by federal patent law 
rather than the less effective 
copyright statutes. The law 
clearly prohibits the produc- 
tion of work-alike devices 
to replace The BLOCK. 


The BLOCK attaches to 
any cCOmmunications port of 
virtually any microcomputer. 
It comes with a unique 
customer product number 
programmed into the circuit. 

The BLOCK is transpar- 
ent to any device attached to 
the port. Once it is in place 
users are essentially unaware 
of its presence. The BLOCK 
may be daisy-chained to 
provide security for more 
than one software package. 

Each software developer 
devises their own procedure 
for accessing The BLOCK 
to confirm a legitimate user. 
If it is not present, then the 
program can take appro- 
priate action. 


‘*... possibilities... 
limited only by your 
imagination...” 


The elegance of The 
BLOCK lies in its simplicity. 
Once you understand the 
principle of The BLOCK, 
hundreds of possibilities will 
manifest themselves, limited 
only by your imagination. 

Your efforts, investments 
and intellectual property 
belong to you, and you have 
an obligation to protect 
them. Let us help you safe- 
guard what’s rightfully yours. 
Call today for our brochure, 
or a demo unit.” 





oe CCUF. Ml Yinc. 


870 High Ridge Road Stamford. Connecticut 


06905 


203 329 8870 
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PAINLESS WINDOWS. 








Windows. Data Entry. Menus. 
Finally,a C programmers’ tool that makes 
them as easy to use as printf). 

With Greenleaf DataWindows™ 


you move in quantum leaps! 


GS Snazzy Window Treatments 


DataWindows represents an important 
breakthrough in C programming tools. It 
sets you free so you can create exciting 
programs quickly and easily, saving both 
time and money! Developed to work with 
the IBM PC, XT, AT, compatibles, and 
MSDOS or PCDOS, DataWindows is a 
carefully tooled system of C functions which 
will jazz up your programs with 
unprecedented efficiency. 


Greenleaf DataWindows is integrated 
windows, transaction data entry, pop-up, 
pull-down, and Lotus style menu systems 
with: 
= Screen Management. You don’t have to 
remember what’s on the display or the 
sequence in which you put it there. 
DataWindows does the grunt work. 
There are no restrictions. 


= Transaction Data Entry. Data entry 
windows can have any number of fields 
with sophisticated options for reading 
many data types. Calls are made to help, 
validation, and other functions. Full 
featured text editing, protected and 
mandatory fields, dBASE type picture 
strings, context sensitive help, validation 
of fields and transactions, redefinable 
keys, password entry, attribute control, 
keyboard idle and much more. 


= Device Independence. It detects the type 
of display adapter your computer is using 
and adjusts to it automatically for CGA, 
EGA, or monochrome. Logical video 
attributes are easy to use for color or 
monochrome. 

= Compatibility. Runs with Microsoft 
Windows and IBM TopView. 


= The Greenleaf Tradition of Quality. Reliable 
products. Professional documentation that 
gets you up and running quickly and 
keeps you there. Reference card. 
Newsletter and Bulletin board. 


IBM, Microsoft & dBase, are registered trademarks of International 
Business Machines, Microsoft Corporation & Ashton-Tate respectively. 


PCDOS, IBM PC, XT, AT, & TopView are trademarks of IBM; MSDOS. 
and Microsoft Windows are trademarks of Microsoft Corporation. 
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GEE Stop Window Shopping a 
Order Today. Or call toll free for a free 
demo of the windows library that makes 
all the others obsolete. 

Order any of these high performance 
tools by calling your dealer or 
1-800-523-9830 today. Specify compiler 
when ordering. Add $8 for UPS second 
day air, or $5 for ground. Texas residents 
add sales tax. MasterCard, VISA, P.O., 
check, COD. In stock, shipped next day. 


Greenleaf DataWindows $225 
DataWindows Source Module $225 
The Greenleaf Comm Library v2.0 $185 
The Greenleaf Functions v3.0 $185 
Digiboard Comm/4-II $325 
Digiboard Comm/8-II $535 





GREENIEA 
S ” peal 
1411 LeMay Drive, Suite 101 
Carrollton, TX 75007 
Call Toll Free 
1-800-523-9830 
In Texas and Alaska, call 


214-446-8641 
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Homeroom Window Dressings Ree 


= Simple or Complex Windows. Up to 254 
powerful overlaid windows 
simultaneously, all with just one kind of 
window to remember! Yet any window 
can be from one character to 32K! 


= Easy Window Operations. DataWindows 
lets you move, zoom, frame, title, change 
colors, titles, frames, size, location, and 
make windows visible or invisible at will! 
Functions set cursor, attributes, and write 
data to any window or “current window’. 
Word wrap, auto scroll, keyboard 
functions. 


@ Write to Any Window Any Time. Windows 
may be visible, overlaid, or invisible, and 
you can write to them anyway. What you 
write will be seen when the windows 
become visible. 


= DataWindows is fast! It writes directly to 
video memory (in some modes). 


w Easy to save! Any window, complete with 
attributes, can be saved on disk quickly 
and efficiently. 


= Source code available. No royalties. 


Eee Also from Greenleaf: ae 


The Greenleaf Functions v3.0 
The most complete, mature C language 
function library for the IBM PC, XT, AT 
and close compatibles. Includes over 225 
functions — DOS, disk, video, color text 
and graphics, string, time/date, keyboard, 
disk status and Ctrl-Break functions plus 
many more. 


The Greenleaf Comm Library 
Our 2.0 version is the hottest 
communications facility of its kind. Over 
120 functions — ring buffered, interrupt 
driven asynchronous communications for 
up to 16 ports simultaneously with 
XMODEM, XON/XOFF, many many 
sophisticated features. 


We support all popular C compilers for 
MSDOS/PCDOS: Microsoft, Lattice, 
Computer Innovations, Aztec, DeSmet, 
and others. 


35 


ARTICLES 


Echelon’s Z-System 


ichard Conn’s public-do- 
R main ZCPR3 is an enhanced 
substitute for CP/M 2.2’s con- 


sole command processor (CCP). Eche- 
lon, a software firm headed by pub- 


lic-domain pioneer Frank Gaudé, has | 


combined ZCPR3 with Dennis 
Wright’s ZRDOS, a Z80-optimized BDOS 
replacement, to form the joint nucle- 
us of an 8-bit operating system sup- 
ported by a cluster of customized 
tools, utilities, libraries, and hard- 
copy manuals. The term Z-System re- 
fers specifically to the operating sys- 
tem itself (ZCPR3 combined with 
ZRDOS) and generically to Echelon’s 
entire line of ZCPR3 utilities and soft- 
ware tools. 

In this article, Ull evaluate the 
ZCPR3-ZRDOS nucleus of Z-System 
from the viewpoint of an advanced 
programmer, stressing its program 
design and structure. 


Versions of Z-System 
Echelon sells Z-System in two basic 
forms: Joseph Wright's auto-install 
version, Z-Com, which uses a host CP/ 
M 2.2 system to overlay the CCP and 
BDOS with ZCPR3 and ZRDOS and then 
expands the host CBIOS to make room 
for memory-resident utilities and 
buffers; and a manual-install or 
“hacker” version consisting of the 
source codes for all system compo- 
nents and utilities except the optional 
ZRDOS. The SIG/M public-domain ver- 
sion omits the proprietary ZRDOS but 
comes with Conn’s SYSLIB3 and deriv- 
ative Z3LIB and VLIB libraries of Z80 
routines used in the assembly of Z- 
System components. 

Z-Com ($119) is the better choice for 
turnkey systems, inexperienced us- 
ers, or anyone who wants to install a 


Morris Simon, 118 Brookhaven, Tus- 
caloosa, AL 35405 
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by Morris Simon 


: Z-System is an 8-bit 
operating system for 


Z80 systems. 





complete Z-System in a few minutes. 
Advanced programmers who will be 
doing major customizations to Z-Sys- 
tem segments have both the develop- 
ment tools and the assembly-lan- 
guage skills needed to install the 
more expensive but flexible manual 
version ($182.50 with ZRDOS, if pur- 
chased piecemeal from Echelon). 

The major difference between the 
two versions is that Z-Com requires 
the presence of CP/M 2.2 to boot it asa 
transient command file. In contrast, 
the manual installation procedure 
completely replaces the CP/M CCP 
and BDOS on the system tracks with 
ZCPR3 and ZRDOS (if present) to pro- 
duce a bootable Z-System disk. In ad- 
dition to Z-Com’s use of CP/M to boot 
itself, the two versions differ in that 
Z-Com’s system components are pre- 
selected and contained in a set of ob- 
ject-code files. With Z-Com, major 
changes and additions can be tricky 
and may require some disassembly 
and patching. Z-Nodes, a remote bul- 
letin-board network of international 
Z-System users, distributes useful 
public-domain patch files to make 
this job a little easier. 

The manual-install version comes 
with the source code for all major 
system components (except the op- 
tional proprietary ZRDOS) so that us- 
ers can modify any feature of ZCPR3 
separately to suit their needs or hard- 





ware requirements. Assembly of the 
altered code requires a good relocata- 
ble macro assembler, preferably one 
that can assemble Zilog mnemonics, 
and standard system alteration and 
debugging utilities such as MOVCPM, 
SYSGEN, and DDT or their equivalents. 
Modification and reassembly of the 
individual utilities may also require 
access to the appropriate Z-System 
source-code libraries—SYSLIB3, Z3LIB, 
and VLIB. 


Components 

Each version uses its own installation 
procedures and design principles to 
achieve the same functional result. In 
either case, the user’s CBIOS is modi- 
fied and extended by several optional 
memory-resident system segments— 
customized packages of Z80 code and 
buffer areas. A complete Z-System 
includes 


*ZCPR3, the console command 
processor 
¢ either BDOS or ZRDOS 


¢ a modified CBIOS 

ea revised page zero with jump ad- 
dresses to the new CBIOS and BDOS or 
ZRDOS and new buffers (in the man- 
ual version) 


The modified CBIOS contains 


¢ the original BIOS codes 

¢an initializing routine that sets Z- 
System equates and addresses 

¢the Resident Command Package 
(RCP) (a cluster of memory-resident 
utilities) 

ethe Input/Output Package (IOP) 
(space reserved for customized I/O 
drivers) 

¢the Flow Command Package (FCP) 
(equates used by system utilities that 
permit conditional logic and flow 
states) 
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¢ the Environment Descriptor (Z3ENV) 
(system equates used by utilities) 

¢e buffers, stacks, and equates (re- 
served spaces for shell operations, 
messages shared by several utilities, 
named directories, RAM registers, 
and assorted byte or word locations 
such as the ‘“‘wheel” security byte) 


Figures 1 and 2, below, illustrate 
memory-map differences for the two 
versions using sample addresses 
from a TeleVideo 803 64K RAM. Seg- 
ment sizes and locations will vary 
with other systems. 

The auto-install version makes Z- 
System transportable to a wide vari- 
ety of memory structures because it 
involves less alteration of the user's 
CBIOS than the manual version does. 
With Z-Com, the entire Z-System 
package is loaded in front of the origi- 
nal CBIOS, extending it and overwrit- 
ing both the CP/M BDOS and CCP. A 
new jump table at the first RAM page 
of the relocated CBIOS intercepts sys- 
tem calls and redirects them to Z-Sys- 
tem segments such as the Input/Out- 


_ oan external FCB 
shell stack 


- Z3ENV and TCAP 
nen loader in cold-boot routine 


48K TPA 


(48,896 bytes free) 


page zero with wheel byte, 
New jump addresses, and 
external path buffer_ 





_ Hexadecimal addresses are system-c 





Figure 1: A complete manual-install version 


of Z-System 
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: i: | lependent and op 
_ This example is based upon a composite of Conn’s mod 
in ZCPR3: The Manualand my own Z-System segments 


put Package or to the original CBIOS 
jump locations. The system segments 
and buffers are loaded between the 
new and old CBIOS jump tables. ZRDOS 
and the ZCPR3 command processor 
reside below this extended CBIOS, at 
somewhat lower addresses than CP/ 
M's CCP and BDOS did in the host 
system. 

When I first started using Z-System, 
I was disturbed by this loss of vital 
RAM space, as any serious 8-bit user 
should be. I soon realized, however, 
that most CP/M 2.2 programs are 
written so tightly that they seldom 
require a TPA of more than 40K or so. 
This is a tribute to 8080 and Z80 as- 
sembly-language programmers who 
can never afford the 16-bit luxury of 
bulky and redundant code—there’s 
just no room for it. Even when CP/M 
programs overwrite the command 
processor, they often are just using 
the BDOS (or ZRDOS) address stored at 
location 0006H in page zero as a con- 
venient way to set up a program 
stack that will work on any CP/M sys- 
tem. The TPA between the end of a 


original ROM and BIOS buffers 
original BIOS 
Input/Output Packages 


Hexadecimal addre 


Figure 2: A complete auto-install (Z-Com) 
version of Z-System 


program and the end of its stack is 
often an empty space of more than 
20K, whereas the Z-System exten- 
sions require only around 6K. 

The manual-install version shown 
in Figure 1 saves a littke more RAM 
space (512 bytes) by moving the CBIOS 
downward, placing the external 
path buffer and wheel byte in page 
zero and relocating the original BIOS 
jump table. If ZRDOS is installed, it re- 
sides directly beneath the original 
BIOS jump table, just as the BDOS does 
in CP/M systems. All ZCPR3 external 
segments and buffers reside above 
the original CBIOS, except for an ini- 
tializing routine poked into the used 
cold-boot loader space. 


ZCPR3 and Its Extensions 

The heart of either Z-System version 
is Conn’s ZCPR3 command processor 
with its internal enhancements and 
CBIOS extensions. ZCPR3 users have 
many optional and enhanced inter- 
nal commands, such as SAVE, GO, 
JUMP, TYPE, and others, that are 
unavailable in CP/M 2.2. Multiple and 





Flow Command Packages 
Resident Command Packages : 
ZCPR3 external stack 


: ZCPR3 command-line buffer | 


environment descriptors 
Z3ENV and TCAP 


| commandsearchpath | 
ae hs ee 
Ba eee ce ae 


48K TPA 
(48,384 bytes free) 


modified page zero with new 
buffer areas and jump addresses 
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ECHELON’S Z-SYSTEM 
(continued from page 37) 


extended command processing, in- 
stantaneous user area or directory se- 
lection, command path assignment, 
and wheel access control are some of 
the internal ZCPR3 options that are of- 
ten found only on larger systems. By 
skillful assembly-language program- 
ming, Conn has squeezed these and 
other features into the original 2K 
CCP space in order to maintain com- 
patibility with earlier CP/M programs 


WIZARO C 





for which the CCP size is critical. Al- 
though these enhancements in the 
body of the command processor are 
definitely valuable, ZCPR3’s unique 
advantages lie in the external Z-Sys- 
tem segments. 

ZCPR3’s modular components re- 
side in high memory for fast access, 
increasing the power and flexibility 
of the command processor beyond 
that of any other 8-bit operating sys- 
tem and for some operations of larger 
ones as well. These fast resident utili- 
ties actually permit users of tiny 8-bit, 





“The Best Compiler Today” 


“Wizard's is the best compiler today. What it does have is 
library source for a very large library. good documentation. 


excellent support, and lint. 


“Our choice if we could make our own? We would take 


Wizard...” 


Dr. Dobb’s Journal 
August, 1986 


“. . .the compiler’s performance makes it very useful serious 
software development.’ 


PC Tech Journal 
January. 1986 


. .written by someone who has been in the business a 
while. This especially shows in the documentation.” 





Computer Language 
February. 1985 


You ve Tried The Rest 
now try the Best 


(617) 641-2379 
Only $450 


(on 
i/ ‘ si q Smrmess, 4 
‘MasierCars! | VISA | 8 i 

j / ys { : ' 


Cee a ee Sa —eree- OO 


Wizé\RD 


SYSTEMS SOFTWARE, INC. 


11 Willow Court, Arlington, MA 02174 


Circle no. 116 on reader service card. 
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64K systems to enjoy the speed and 
efficiency of a RAM disk for many rou- 
tine tasks. 

The modular design of the ZCPR3 
CBIOS extensions permits users to 
modify any resident utilities, named 
directory structures, flow control 
states, input/output drivers, com- 
mand paths, and most other Z-System 
features whenever they choose to 
change or add to them. 

With the manual-install version, 
you can perform massive alterations 
upon any of these features simply by 
editing and reassembling one or 
more well-documented source files 
into a variety of relocatable object- 
code segments. With the Z-Com ver- 
sion, you may have to disassemble 
some object code in order to tailor the 
system segments to suit your needs. 
When either object-code package is 
ready, you can use a fast loader utili- 
ty (LDR.COM) to reinstall different sys- 
tem segments instantly to fit chang- 
ing jobs. 

You might, for example, wish to 
use separate resident command 
packages (RCPs) for word processing 
and assembly-language program- 
ming, with different resident utilities 
in each one to reduce disk access 
time. I have several manuscript-edit- 
ing aids in a word-processing RCP and 
a fine memory editor (MU3) in anoth- 
er RCP I use for programming. An 
alias batch command reconfigures 
my CBIOS by loading one of these spe- 
cialized command packages auto- 
matically each time I enter its respec- 
tive directory area. Because resident 
command packages always reside in 
RAM, [can run any of these utilities at 
high speed without modifying any 
TPA code. 

Z-System’s named directories are 
more convenient and flexible than 
the Unix-style MS-DOS directories I use 
in an IBM-equipped computer labora- 
tory. ZCPR3’s directories are based 
upon CP/M’s user areas, yielding up 
to 32 possible directories or subdirec- 
tories with optional passwords on 
any one “‘level.’’ You need to expand 
the default named directory buffer if 
you plan to use more than 14 directo- 
ry names at one time. 

All ZCPR3 directories exist on the 
same level to the operating system, 
but you can create a Unix-style hierar- 
chical effect by overlaying previous 
levels automatically with the change 
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STAY-RES —Make Compiled BASIC* Programs 
Memory-Resident. 


Invoke your program with a ‘‘hot key’’ or a POKE 
from another program. Protects you from calling 
DOS functions at unsafe times. Automatic screen 
save /restore in text or MONO /CGA graphics modes 
(including EGA, Hercules). More than one program 
can be co-resident. Enables you to perform multi- 
tasking with BASIC. Compatible with any well- 
behaved program and most not-so-well behaved 
ones. Demo available. $95 


MACH 2—Ultra-fast, Extensive Assembler 
Subroutine Library for BASIC* 


Our assembler subroutines give your programs a 
Crisp, professional look and feel. Display data in- 
stantly when compiled. Window manager. Store, 
sort, search string data using all available DOS 
memory—no more 64K limit. Controlled input 
routine allows full use of standard editing keys & 
ignores Ctrl-C and Ctri-Break. Change screen 
attributes without re-displaying text. Read /write 
files FAST as DOS. PRINT USING for numbers up 
to 6 times faster than BASIC. Number rounding. 
DOS/BIOS function calls & interrupts. Many more 
functions. Source code available. Demo available. 
No assembler or knowledge of assembler program- 
ming is required. $75 


PEEKS ’N POKES —Get More out of the IBM PC 
Family* 


Read & change system configuration. Read / write 
CMOS chip on AT class machines. Unprotect GW- 
BASIC, BASIC, BASICA programs saved with ‘‘P’’. 
Read & change keyboard status. Plug characters in- 
to keyboard buffer. Read printer, COM and video 
status. Swap monitors, COM ports and printers. 
Generate more and better sounds than BASIC. Find 
more PEEKS & POKES. Tutorials on binary & HEX 
numbers, DEF SEG, Port, INP, OUT, logical opera- 
tors. Boot your system three different ways from 
BASIC. Many more functions. Most source code in- 
cluded. $45 


THE INSIDE TRACK —Programmer’s Utilities & 
Starter Assembler Routine Library for BASIC”. 


Control keyboard shift status from DOS or your 
program — force CAPS lock, NUM lock, etc. Keep 
diskette motor running for better throughput. Copy 
protect a diskette. Boot your system three different 
ways from DOS. Duplicate one monitor’s contents 
on the other monitor. Load & execute large EXE files 
faster than DOS, from DOS or compiled BASIC. 
Limit memory used by compiled BASIC programs 
to avoid reloading Command.com. Send ANSI con- 
trol characters to screen in any compiled BASIC. 
Memory map and BIOS call reference chart, in- 
cluding EGA calls. All source code included. Many 
more functions. $65 


Holiday Gift Ideas-— 


For Yourself or Your Friends 
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Stay-Res, Peeks ’n Pokes, 
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Stay-Res, Mach 2 
Stay-Res, Peeks ’n Pokes 
EH Wa eo OM tt 


Peeks ’n Pokes, The Inside 
air TH 


NOT COPY PROTECTED. None of our software is 
copy protected. All subroutines can be included 
in your compiled programs with no royalties. All 
software requires an IBM PC, XT, AT, Tandy 1000, 
1200, 3000 or compatible with DOS 2 or later. Free 
technical support included with all products. 


*Each package includes a manual containing 
complete instructions and sample programs. All 
packages are compatible with QuickBASIC 1 & 2, 
BASCOM 1 & 2, MS BASIC Compiler 5.36. (Stay- 
Res with QB 2 requires DOS 3 or later.) Stay-Res 
programs use a minimum of about 90K Memory. 
All except Stay-Res compatible with BASIC Inter- 
preter, BASICA, GW-BASIC, MS BASIC. 
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DEMONSTRATION DISK: Send us a check for $5 
(no credit cards, please) and we'll send you a 
demo of Mach 2 and Stay-Res. The $5 will be ap- 
plied to your purchase of any of our software that 
is purchased directly from us. 


ORDER NOW. VISA/MC/COD orders call 
1-800-922-3383 (COD USA only—add $3). In 
Georgia (404) 973-9272. Add shipping and hand- 
ling: $3 per order USA, $5 for 1 or 2 packages to 
Canada (add $2 each adat’l package). Elsewhere 
$18 for first package, $7 each additional. GA 
residents please add sales tax. 


MicroHelp, Inc. 
2220 Carlyle Drive e Marietta, Georgia 30062 


Circle no. 215 on reader service card. 


PC Network: the world’s #1 supplier of 


OVER 30,000 PRODUCTS AT — 


Arity Corporation 
Expert System Development Package $235.00* 
File Interchange Toolkit 37.00* 
Prolog Compiler and Interpreter 650.00* 
Prolog Interpreter 275.00* 
SQL Development Package 235.00* 
Screen Design Toolkit 37.00* 
Standard Prolog 70.00* 
Arity Combo Package 950.00* 


Blaise Computing Inc. 





























Asynch Manager for C $115.00* 
Asynch manager for Pascal 115.00* 
C Tools/Tools 2 Combo Pack 115.00* 
C Tools 85.00* 
C Tools 65.00* 
C Tools Plus 115.00* 
| Exec 65.00* 
CALL TOLL FREE Pascal Tools/Tools 2 Combo 115.00* 
\ Pascal Tools 85.00* 
(800) 621-SAVE »& Pascal Tools 2 65,00* 
) ice cueie ae & Runoff 35.00* 
rders— Membership an bate = 
In Illinois Call (312) 280-0002 ab ee = en 
beta ortses te eee Cy titel s, DD22 © Fower iools fius yo 
You can validate your membership number and, if you wish, View Manager w/Source for C 185.00 
place your first money-saving order over the phone by using View Manager w/Source for Pascal 185.00* 
your VISA, MASTERCARD or AMERICAN EXPRESS. 
Our knowledgeable sales consultants are 4 
on duty Mon.-Fri. 8:00 AM to-7:00 PM Borland International 
Sat. 9:00 AM to 5:00 PM CST. Refl $54.00* 
PERSONAL COMPUTER NETWORK oe 
320 West Ohio Street Reflex and Workshop Bundie one 
a eet ee tec F ae Reflex Workshop 35.25 
Customer Service and Order Status (312) 280-1567 Turbo Database Toolbox 34.00* 
mie tasesd Nov. 1, 8:00 AM to 8:00 PM, Mon.-Fri. Turbo Editor Toolbox 35.00* 
a ee eT ee a eee a eS Ne ae <a Turbo Gameworks Toolbox 35.00* 
PC NETWORK MEMBERSHIP APPLICATION | Turbo Graphix Toolbox 32.97* 
YES! piease enroll me as a member in the PC NETWORK™ Turbo Lightning 48.50* 
and send my catalog featuring thousands of computer products, Turbo Pascal w/8087 and BCD Support 50.00* 
all at just 8% above DEALER WHOLESALE PRICES. | will also | Turbo Tutor 19.50* 
receive “THE PRINTOUT", a special quarterly update on Word Wizard 37.25* 
merchandise at prices BELOW even those in my wholesale catalog < ; : : 
and all the other exclusive, money-saving services available | Word Wizard and Turbo Lightning Bundle 79.50* 
to 2 as apie toe under no obligation to buy anything. My 
complete satisfaction is guaranteed. 4 
Please (™) all boxes that apply: % a | Lattice 
s at Sat C-Compiler 3.1 $250.00* 
@Basic Membership $8 [1° $18 : 5 
With 14 Days Rental C-Sprite Debugger 115.00* 
Business Software Rental Library$25 [] add'l. per year | C-Food Smorgasbord 82.00* 
Games Software RentalLibrary $10 () add'l. per year Sidetalk 79.00* 
1 Year 2 Vear | DBC-III Library 137.00* 
@Special V.I.P Membership $15 CL) $25 0 RPG-II Compiler 410.00* 
With 30 Days Rental 
BOTH Business and Game a 
Software Rental Libraries $30 (J add'l. per year | LogiTech 
LJBill My Credit Card: (JVISA (JMasterCard [JAmerican Express | LogiMouse $75.00* 
Account | LogiMouse + 89.00* 
Number: SSS Eee LogiMouse + w/PC Paint 117.00* 
Exp. Date LogiMouse + w/Generic CAD 139.00* 
mon. yr. | LogiMouse + w/Reflex 145.00* 
[ ]JCheck or Money Order Enclosed for $ Bi. oa LogiMouse + w/Generic CAD and PC Paint 158.00* 
Name Modula—2/86 Compiler 55.00* 
Address Apt. No. | Modula—2/86 Compiler w/8087 85.00* 
Ce fs So a ear ee ee ee Lo Gin Modula—2/86 Compiler w/512K 142.00* 
Telephone ( ) | Modula—2 Runtime Debugger 41.00* 
My Computer(s) is: JIBM PC (JIBM XT [CJIBM AT Modula—2 Source Package 79.00* 
(JApple II [JMacintosh Other Modula—2 Translator 35.00* 
Signature | Modula-—2 Utilities Package 35.00* 
(Signature required to validate membership) Modula—2 Window 35.00* 
Copyright© 1986, PC NETWORK, INC. | 
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everything for the program developer. 


EVERYDAY LOW, LOW PRICES! 


Micro Focus 















































* All Items are Subject to Availability, Prices Subject to Change Without Notice. 
TM— Registered Trademarks of Apple/Epson/IBM/Macintosh/Microsoft. 








Cobol Workbench $32.00* 
Level II Cobol 550.00* 
CoGraphics 199.00* 
CoMath 150.00* 
Forms—2 245.00* 
Level II Animator 675.00* 
Level II Source Writer 1,499.00* 
Micro/SPF 140.00* 
Professional Cobol 2,200.00* 
Multiuser Runtime for PC Net 400.00* 
Microsoft 
Cobol Tools 199.00* 
Basic Interpreter for Xenix 190.00* 
Quick Basic 57.00* 
Basic Compiler 237.00* 
C Compiler 230.00* ; 
Cobol Compiler 420.00* True Basic 
Fortran Compiler Xenix 313.00* True Basic Algebra 27.00* 
Fortran Compiler PC 184.00* True Basic Asyncronous Communication Libr 27.00* 
MULISP 180.00* True Basic BTrieve Interface Libr 27.00* 
Macro Assembler 4.0 84.70* True Basic Calculus 27.00* 
MUMATH/MUSIMP 180.00* True Basic Chipendale 27.00* 
Pascal Compiler for Xenix 297.00* True Basic Developer's ToolKit 27.00* 
Pascal Compiler for PC 162.00* True Basic Discrete Math 27.00* 
Sort Facility 117.00* True Basic Form Libr 27.00*. 
Windows 51.00* True Basic Hercules Graphics Support Libr. 27.00* 
Windows Development 290.00* True Basic PC Basic Converter Library 27.00* 
True Basic Pre-Calculus 27.00* 
Phoenix Software True Basic Probability 27.00* 
True Basic Rules For True Basic 79.00* 
PFantasy Pac 800.00* True Basic Sorting Searching Library 27.00* 
PFinish 210.00* True Basic String Library 27.00* 
PFix 86 Plus 210.00* True Basic Trigonometry 27.00* 
PForce 210.00* True Basic True Basic 79.00* 
PLink—86 Plus 299.00* 
PMate 199.00* 
Pre—C 160.00* 
PTel 119.00* 
Ryan McFarland 
Fortran 77 Compiler $327.00* 
RM/Cobol Full Development 570.00* 
RM/Cobol Runtime 150.00* 
RM/Cobol 8X Full System 799.00* 
RM/Cobol 8X Runtime 189.00* 
RM/Cobol Network Full System Ver.2.1 799.00* 
RM/Cobol Network Runtime Ver.2.1 339.00* 
Softcraft 
Btrieve 175.00* 
Xtrieve 130.00* 
Rtrieve 109.00* 
Rtrieve, Network Version 249.00* 
Xtrieve, Network Version 419.00* 
Btrieve, Network Version 419.00* 
Summit Software 
Better Basic $119.40* 
8087 Math Module 59.00* 
Runtime System 150.00* 





1800 621-SAVE 


IN ILLINOIS 312 280-0002 


Circle no. 200 on reader service card. 
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brackets are mine. 


ADVANTAGE C++ = Take advan- 
tage of object-oriented programming. 
Add resiliency and flexibility to your 
code without sacrificing the standard- 
ization of C. Build large and sophisti- 
cated programs more productively. 
C++, developed by AT&T, has many 
enhancements over C, yet maintains 
full compatibility with existing C 
programs. 


ADVANTAGE Link Fastest, most 
powerful linker available for PC-DOS, 
and the first overlay linkage editor to 
fully utilize extended memory. Sup- 
ports memory caching, object file 
merging, overlays and more. Gener- 
ates optimized command files for 
fastest possible link times. 


. leenrandped 
; [5 2-byte elements 


3 [address of Res 









Table 1: Excerpt from Z-COM version of Z3BASE.LIB. Comments in square 





TimeSlicer Create multi-tasking 
and real-time applications in C with 
this library of useful tools and services. 
Optimizes processor usage and trans- 
parency. Brings multi-tasking into your 
application rather than interfacing with 
the operating system, allowing for 
more efficient and portable programs. 


To order or to obtain complete spe- 
cification sheets call: 


1-800-847-7078 
In NY: 914-332-1875 


[KEEDAAT 


Salil Bal’ OF" & 


The Full-Service Source for Programming Software. 








Circle no. 118 on reader service card. 
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_; [for 8080 systems] _ : 
















ECHELON’S Z-SYSTEM 
(continued from page 38) 





directory (CD) and alias commands. 
This causes a new named directory 
system to be loaded into the CBIOS and 
reorganizes all the files contained in 
the new user areas you tell the system 
to “see.” The result can be a virtual 
hierarchy of dynamic subdirectories, 
or a flat passworded subdirectory lay- 
er, or whatever you wish it to be. As 
with the other modular extensions of 
the command processor, the package 
of directory names can be changed by 
simple editing, and a special make di- 
rectory (MKDIR) utility is provided just 
for that purpose. 

The buffers and locations used by 
the various components of Z-System 
must be initialized at the time ZCPR3 
and ZRDOS (if present) are loaded. In 
the manual version, a configuration 
routine resides in the CBIOS cold-boot 
loader area from which it assigns all 
ZCPR3 internal and external options 
as well as external buffers and other 
CBIOS locations. Changing parame- 
ters, addresses, or buffer sizes is a 
simple matter of editing two header 
files, Z3HDR.LIB and Z3BASE.LIB, and 
making whatever secondary 
changes are required elsewhere, es- 
pecially when you have changed the 
size of a segment buffer or two. 

In the manual-install version, 
Z3HDR.LIB contains users’ options for 
most ZCPR3 features and commands 
and Z3BASE.LIB defines the locations 
of external segments. In Z-Com’s ver- 
sion of Z3BASE.LIB (Table 1, above), 
these addresses are all defined as off- 
sets from a single environment de- 
scriptor location determined by the 
installation process. You can still 
poke or patch changes in the object 
code of Z-Com components if you 
know what you're doing. 

When assembled, the Z3BASE.LIB 
header file becomes the first half of 
ZCPR3’s environment descriptor, 
Z3ENV, which gives Z-System a major 
transportability advantage over 
other 8-bit operating systems. The de- 
scriptor is merely a duplex header 
file containing default or user-de- 
fined information such as the ad- 
dresses of all Z-System segments, CRT 
and printer values, CPU speed, cursor 
and highlighting controls, and many 
other system-specific details. 

All Z-System utilities use the de- 
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scriptor’s data to customize their op- 
eration and to communicate with the 
system segments. In order to install a 
new utility inside your operating sys- 
tem, you merely place a pointer to 
Z3ENV in the utility’s source code and 
refer all system-dependent routines 
to it. Table 2, below, illustrates this 
use of the environment descriptor in 
the source code for a fast file-find 
utility. 

Calls to the Terminal Capabilities 
(TCAP) half of the environment de- 
scriptor permit the immediate trans- 
portability of any software that uses 
terminal-specific features such as 
video graphics, windowing, and pull- 
down menus. Users can customize 
their programs instantly to take ad- 


vantage of special terminal features 
such as graphics characters and cur- 
sor positioning codes. Neither soft- 
ware nor hardware differences will 
interfere with transportability of Z- 
System programs as long as the 
Z3ENV pointer is properly installed. A 
special utility, Z3INS.COM, can install 
or reinstall the Z3ENV address quickly 
in any object-code files written for Z- 
System use. 

ZCPR3’s flow control and multiple 
command features are essential com- 
ponents of shells and interactive 
menus. Both permit users to con- 
struct long conditional arguments 
that are useful in the automation of 
complex tasks. ZEX (an extended com- 
mand processor), VFILER (a file-sweep 


e eddrece of the customized Z3ENV 


Ser OFEOOH 


- : These are external macros found i in Conn’s sYSLI 


sauce 
ee 


EXT -ZBINIT GETNDR, GETWHL, CODEND 


Sx) COUT, CRLF,PRINT,PADC 


“This conditional assembly statement tests the ; 
_ code for the address of an external Z3ENV. 


IF _Z3ENV NEQ- 
JP START 





Yo Aesuoy 


ELSE 


_ / Conditional assembly oe funétioning. if 


_ ‘installed i in utility itself by calling macros 





: 7 , ZSBASE. LIB and SYSENV.LIB pe assembl 


_Z3BASE. LB 
_ SYSENV. LIB 


- MACLIB 
Le 
neon — , 
ee ‘START | 
- | SYSENV o 


eo b HLZ3EADR 


: Z3iNT 
HL,O 


‘a macro used 





Table 2: Excerpt from FINDF24.Z80, a fast find utility written by Richard 


Conn. All comments are mine. 
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A Reconfigurable 
Programmer’s Editor 
With Source Code 


ME is a high quality programmer’s text ed- 
itor written specifically for the IBM PC. It 
contains features only found in the more 
expensive programmer’s text editors. These 
features include: 


e Multiple Windows 
¢ Column cut and paste 
e Regular Expressions 
e C-like Macro Language 
e Keyboard Macros 
e Reconfigurable Keyboard 


New commands and features may be add- 
ed to the editor by writing programs in its 
macro language. The language resembles 
C, and it’s extremely easy to write and 
examine macros when you are not dealing 
with a parenthesized language like LISP. 
The macro languages comes with a rich set 
of primitives for handling strings and 
changing the editor environment. 








The source code option lets you see how 
text editors are written, and gives you real- 
world applications of various data struc- 
tures. You will also learn how to write in- 
terpreters by examining code to the macro 
language compiler and interpreter. 


A unique advantage of the source code op- 
tion is that many programmers will have 
the opportunity to examine the code, im- 
prove parts of it, and add additional fea- 
tures. The best of these improvements and 
enhancements will be incorporated into 
future releases, which, as a_ registered 
source code user, you will receive updates 
for. 


The code is written in C, and conforms to 
the ANSI standard. This allows the code to 
be compiled with any compiler that sup- 
ports the ANSI standard. A few of the 
string handling and input-output routines 
are written in 8086 assembly language. for 
speed. 

The source code option is perfect for 
OEMs and VARs who want to add a text 
editor to their applications. 


Price for program and on- 
line documentation — 
$34.95 

Price for editor with 
complete source code — 
$84.95 

Special offer — New York 
Word word processor — 
$19.95 — Split screen, mail 
merge, hyphenation, math, 
regular expressions 


MAGMA 
SYSTEMS 
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138-23 Hoover Ave., Jamaica, NY 11435 
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ECHELON’S Z-SYSTEM 
(continued from page 43) 


utility with macro options), and 
VMENU (an interactive shell of com- 
plex user options) are just a few of the 
many Z-System utilities that rely on 
flow control and multiple command 
processing for their power. 

One of CP/M’s strengths is its input/ 
output redirection capability that 
uses the STAT command to revise 
the I/O byte at location 0003H. Z-Sys- 
tem permits you to retain the CP/M 
device-assignment procedures or to 
use its Own more efficient design 





scale new heig 
__ with OASYS ... 


Our Intel Software Tool Kit keeps on growing ... 


TOOL KIT 


e Fully optimizing C, Pascal and FORTRAN 
Green Hills Compilers with full 80386 
Support 

e Wizard C for 8086/186/286 

e 80386 Phar Lap Macro Assembler 

¢ 80386 Phar Lap Linker with Intel and COFF 
object formats 

e Symbolic Debuggers 

e Full complement of compilers, assemblers, 
linkers, debuggers and simulators for 
8086/186/286 


FEATURES 


¢ 80386 compilers utilize multiple 
optimization techniques producing 
extremely compact code 

e Too! Kit provides complete support for 
80387 and Weitek 1167 Floating Point Units 

e Complete Run-Time Library support 

e 80386 Assembler accepts Intel/Microsoft 
instruction mnemonics 

e Produces COFF and Intel-compatible 
Object modules 

e Assembler/Linker backwards compatible 
with entire 8086 family, including 
8086/80186/80286 

¢ Softprobe || 8086/186 Simulator and 
Debugger 

e Wizard C compiler for 8086/186/286 in- 
Cluding 286 “Protected Mode” 

e Full UNIX support 


60 Aberdeen Avenue, Cambridge, MA 02138 (617) 491-4180 


based on the I/O drivers loaded as In- 
put/Output Packages (IOPs). The Z- 
System approach to device assign- 
ment places any number of device 
drivers into memory, but only when 
needed. In contrast, the CP/M method 
restricts the number and types of 
drivers and requires them to be per- 
manent residents of scarce CBIOS 
space, waiting to be needed. Like the 
other system segments, the IOP struc- 
ture is supported by a variety of Z- 
System utilities such as DEVICE and 
RECORD, which select and activate or 
deactivate particular drivers. Users 
with elaborate hardware configura- 


hts 


AVAILABILITY 
Native on 80386 


For Cross-Development Targeting 
80386/286/186/86: 


VAX; Sun; IBM PC; OASYS PC Platform™ 
PC Co-Processor Board: .. Others being ported 


You name it... 
We provide a “One-Stop Shopping” 
service for more than 100 products 
running on, and/or targeting to, the most 
popular 32-, 16- and 8-bit micros and 
Operating systems. 






We Specialize In: 
Cross/Native Compilers C. Pascal, FORTRAN, 
Ada, LISP — Assemblers/Linkers — Sym- 
bolic Debuggers — Simulators — Inter- 
preters — Profilers — QA Tools — Design 
Tools — Comm. Tools — OS Kernels — 
Editors — VAX & PC — Attached Processors 








and more 


le Support: 
680xx, 80x86, 320xx. 68xx, 80xx: Clipper. 
and dozens more 
We Provide: 
Porting and technical assistance — OEM 
arrangements — Custom development — 
Let us be your external tools group 
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tions can benefit most from the op- 
tional ZCPR3 IOP design. 


Z-Syvstem’s Languages 

One feature of Z-System that has 
caused me some inconvenience with 
both ZCPR3 and its predecessor, 
ZCPR2, is the choice of mnemonics 
used in its source codes. To develop 
ZCPR3, Conn and the other designers 
of Z-System used Z80 assembly-lan- 
guage macro libraries, such as SYS- 
LIB3, Z3LIB, and VLIB, which were 
written originally in extended Intel 
macros rather than “‘pure’”’ Zilog 
mnemonics. Presumably, they want- 
ed to make their source code accessi- 
ble to the widest range of macro as- 
semblers, including Digital 
Research's MAC and RMAC packages. 

Until the past year, the source pro- 
grams for most Z-System utilities, as 
well as the libraries themselves, 
were written only in extended Intel, 
with its bulky 8080 macros substitut- 
ing for more compact and readable 
Z80 instructions. I prefer to code pro- 
grams in Zilog mnemonics, and it is 
sometimes difficult to translate ex- 
tended Intel into Zilog, particularly 
when the Intel macros have the same 
names as Zilog instructions. My solu- 
tion has been to have several differ- 
ent assemblers in different named di- 
rectories on the same disk. An 
interactive menu switches back and 
forth as needed. 

Echelon is correcting this problem 
(if it is a problem for you) in its later 
software versions and now supplies 
source code in Zilog mnemonics as 
well as extended Intel. Zilog mne- 
monics are becoming more common 
in Echelon’s Z-Tools collection of ad- 
vanced system development soft- 
ware, much of which is now being 
sold with Zilog and HD64180 mne- 
monic patches to permit instant con- 
versions and translations. Judging 
from recent issues of the Z-News 
newsletter, the Z-System community 
is tending to favor the newer 8-bit “‘su- 
perchips” such as the Hitachi HD64180 
and the somewhat mythical Zilog 
Z800, whose instruction sets are up- 


ward compatible with Zilog 
mnemonics. 
Advantage of Z80 Code 


Z80 optimization of CP/M’s 8080 code 
in the CCP and BDOs is one of the ma- 
jor strengths of Z-System. By using 
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more compact Z80 codes for relative 
and conditional jumps, block trans- 
fers, direct loading of double regis- 
ters, and double-register arithmetic, 
the Z-System design team have com- 
pressed most CCP and BDOS routines 
tightly enough to add important fea- 
tures. The most common Z80 optimi- 
zations in Z-System are the familiar 
relative and conditional jumps, such 
as the common substitution of Zilog’s 
DJNZ LOOP for the Intel DEC B-JP 
NZ,LOOP pair to control loops, a sav- 
ing of only 2 bytes and either one or 
four clock cycles on each pass. Much 
more impressive optimizations are 
scattered throughout Z-System and 
its utilities, however. 

In the ZRDOS CHECKSUM routine 
shown in the first part of Table 3, 
page 46, for example, Dennis Wright 
(not to be confused with Z-Com devel- 
oper Joseph Wright) substitutes a sin- 
gle 2-byte, 15-cycle Zilog arithmetic 
instruction for a cumbersome 10- 
byte, 51-cycle Intel subroutine 
(SUBDH in the second part of Table 3) 
to subtract the contents of the DE reg- 
ister pair from those of the HL regis- 
ter pair. Note also how Wright's di- 
rect loading of the DREC parameter 
into registers DE eliminates the Intel 
XCHG instruction. Wright's Zilog sub- 
stitutions in this tiny code sample 
alone save 7 bytes and 32 clock cycles 
each time they are used. 

The powerful Z80 block-compare 
and -transfer instructions (LDI, LDIR, 
CPI, and CPIR) are underused in 
Conn’s subroutine libraries and in 
the Z-System code produced from 
them. Wright, however, combines 
LDIR with direct loads of double regis- 
ters to load the disk parameter block 
in the ZRDOS SELECTDISK routine with 
only 11 bytes and 52 clock cycles of 
code. Digital Research's comparable 
Intel code requires twice as many 
bytes and cycles to do the same thing. 
Wright's use of the Zilog LDIR instruc- 
tion saves a total of 11 bytes and 46 
clock cycles, as you can see by com- 
paring the first and second parts of 
Table 4, page 46. 

The most effective Z-System optimi- 
zations have less to do with Z80 fea- 
tures than with sound programming 
practices. In comparing disassembled 
source code for BDOS and ZRDOS, I no- 
ticed that most of Wright's improve- 
ments involved enhanced logic and 
the elimination of redundancy. By 
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skillful sequencing of subroutines, he 
manages to make the flow between 
calling programs and ZRDOS system 
calls smoother and more efficient. He 
uses in-line code in preference to sub- 
routines yet avoids redundancy by el- 
egant relative loops. 

The additional space harvested 
from his thoughtful assembly-lan- 
guage programming allows Wright 
to add several valuable routines and 
even four new system calls to ZRDOS. 
The major alterations in the CP/M 2.2 
BDOS eliminate the nagging warm- 
boot requirement each time a disk is 
changed and make it easier to use the 


read-only disk status feature. ZRDOS 
also permits wheel protection of indi- 
vidual files and file archiving. Two 
other useful new system calls are in- 
cluded to add a warm-boot trap op- 
tion so that users can customize error 
messages by diverting jumps to loca- 
tion OOOOH. 

Following the release of ZRDOS, sev- 
eral new utilities have appeared that 
take advantage of these enhance- 
ments, and the list is growing. Most Z- 
System utilities can work just as well 
under the CP/M BDOS, but newer ones 
such as AC (archive copy) and VIEW 
require ZRDOS instead. Echelon ad- 
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TURBO PROGRAMMERS- 


OP leo 
TAN OPA Law 


A ha gaat 


we CUT S DEBUGGING FRUSTRATION. 


TDebugPLUS is a new, interactive symbolic de- 
bugger that integrates with Turbo Pascal to let you: 


= Examine and change variables at runtime 
using symbolic names — including records, 
pointers, arrays, and local variables; 


= Trace and set breakpoints using procedure 
names or source statements; 


= View source code while debugging; 


= Use Turbo Pascal editor and DOS DEBUG 
commands. 


TDebugPLUS a/so includes a special MAP file 
generation mode fully compatible with external 
debuggers such as Periscope, Atron, Symdeb, and 
others — even on programs written with Turbo 
EXTENDER. 


An expanded, supported version of the acclaimed 
public domain program TDEBUG, the TDebugPLUS 
package includes one DSDD disk, complete source 
code, a reference card, and an 80-page printed 
manual. 256K of memory required. Simplify 
debugging! $60 COMPLETE. 


TURBO EXTENDER™ 


Turbo EXTENDER provides you the following 
powerful tools to break the 64K barrier: 


= Large Code Model allows programs to use all 
640K without overlays or chaining, while 
allowing you to convert existing programs with 
minimal effort; makes EXE files; 

= Make Facility offers separate compilation 
eliminating the need for you to recompile 
unchanged modules; 

= Large Data Arrays automatically manages 
data arrays up to 30 megabytes as well as any 
arrays in expanded memory (EMS); 

= Additional Turbo EXTENDER tools include 
Overlay Analyst, Disk Cache, Pascal Encryptor, 
Shell File Generator, and File Browser. 


The Turbo EXTENDER package includes two DSDD 
disks, complete source code, and a 150-page 
printed manual. Order now! $85 COMPLETE. 


_TURBOPOWER UTILITIES™ 


“If you own Turbo Pascal, you should own 
TurboPower Programmers Utilities, that’s all there 
is to it.” Bruce Webster, BYTE Magazine 


TurboPower Utilities offers nine powerful pro- 
grams: Program Structure Analyzer, Execution 
Timer, Execution Profiler, Pretty Printer, Command 
Repeater, Pattern Replacer, Difference Finder, File 
Finder, and Super Directory. 


The TurboPower Utilities package includes three 
DSDD disks, reference card, and manual. $95 with 
source code; $55 executable only. 


ORDER DIRECT TODAY! 


= MC/VISA Call Toll Free 7 days a week. 
800-538-8157 x830 (US) 
800-672-3470 x830 (CA) 

= Limited Time Offer! Buy two or more 
TurboPower products and save 15%! 

® Satisfaction Guaranteed or your money back 
within 30 days. 


For Brochures, Dealer or other Information, 
PO, COD —call or write: 


ane 3109 Scotts Valley Dr., #122 
u pie Scotts Valley, CA 95066 
(408) 438-8608 
™ M-F 9AM-5PM PST 


The above TurboPower products require Turbo Pascal 3.0 
(standard, 8087, or BCD) and PC-DOS 2.X or 3.X, and 
run on the IBM PC/XT/AT and compatibles. 
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a clock oycles. 


o CHECKSUM: 


“CALL SUBDH 


: register subtract w 


3 tarry flag set—oiff 
_ ; isloadedin HL. 





Table 3: ZRDOS-BDOS code comparisons. Comments and labels are from 


my disassembly. 


LD HL,(DPBADDR) 
LD DE,SECTPT 
LD BC,OFH 
-LDIR 


Table 4: ZRDOS-BDOS code comparisons 


2 Sores to > HL. 
oS Destination to DE. 
; DPB size=16 bytes. 
_; Move until done. 
; Resume 
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ECHELON’S Z-SYSTEM 
(continued from page 45) 


vertises a more powerful version, 
ZRDOS3, designed specifically for the 
Hitachi HD64180 and Zilog Z800 
boards. I have not had an opportuni- 
ty to study ZRDOS3, but Echelon says it 
adds around 50 new system calls to 
handle such advanced 8-bit features 
as multitasking, full-track disk buff- 
ering, and routines for addressing 
larger RAMS. 


Documentation 
Conn’s book ZCPR3: The Manual is 
the installation bible and technical 
reference for ZCPR3 and its utilities, 
particularly if you're installing the 
manual-install hacker version. Eche- 
lon also distributes Z-System User's 
Guide by Richard Jacobson and Bruce 
Morgen, which is more appropriate 
for novice users and others who are 
content with the Z-Com version. 
Many other well-written hard-copy 
manuals on special topics and tools 
are also available from Echelon. 
Z-Com comes with more than 400K 
of on-line modular help files on all as- 
pects of the system, and each utility 
has built-in help screens for immedi- 
ate access. Echelon and Z-Node opera- 
tors are never stingy with source 
code. A few proprietary items, such as 
ZRDOS and some of the Z-Tools, are dis- 
tributed only in object-code files, but 
nearly everything else is available in 
compact assembly-language libraries 
with professional documentation and 
helpful programming suggestions. 


Conclusions 

The major advantages of Z-System 
are Z80 code optimizations, en- 
hanced transportability, powerful 
new user options, and compatibility 
with CP/M 2.2. Ive never encoun- 
tered such elegant and efficient code 
in any other operating system that 
I've worked with. 

My favorite components are the 
RAM-resident utilities, internal flow 
control with nested logic, aliases and 
multiple commands, named directo- 
ries, and customized menu shells, but 
these are just a few of Z-System’s ad- 
vanced features. Combined with fast 
new Hitachi HD64180 boards, Eche- 
lon’s ZCPR3 and ZRDOS leave very lit- 
tle to be desired in an 8-bit operating 
system. 


Dr. Dobb’s Journal, December 1986 


Bibliography 

Conn, Richard. ZCPR3: The Libraries. 
Los Altos, Calif.: Echelon, 1986. A 
manual and guide for Z80 system de- 
velopers using the SYSLIB, Z3LIB, and 
VLIB Z80 subroutine libraries. 

Conn, Richard. ZCPR3: The Manual. 
New York: Zoetrope, 1985. The most 
comprehensive and technical refer- 
ence for ZCPR3 and its utilities. 
Jacobson, Richard, and Morgen, 
Bruce. Z-System User's Guide. Los Al- 
tos, Calif.: Echelon, 1986. Ideal for be- 
ginning Z-System users, especially 
those with the Z-Com auto-install 
version. 


These books and other Z-System ma- 
terials are available directly from 
Echelon. For further information 
and current prices, write or call Ech- 
elon Inc., 885 N. San Antonio Rd., Los 
Altos, CA 94022; (415) 948-3820. 


DDJ 


Vote for your favorite feature/article. 
Circle Reader Service No. 4. 


MS-DOS 


Ci the Advantage. .. 


e to buy Lattice C. Professional 


> 
f Mgrammer's 
Referee 





, oer ~~. a ye et ye , 
pea Pe ow ®. 


e . 3 
a ? 
- eens Ye a eng Pale ee 


programmers the world over have made Lattice C the standard 
compiler for serious MS-DOS programming. Our compiler fea- 
tures include: ANSI language constructs including, unsigned 
as a modifier, void data type, enum data type, structure assign- 
ments, structure arguments, structure returns, and argument 


type checking. 


The library contains more than 200 new functions, including: 
ANSI/UNIX/XENIX compatibility; extended support for MS-DOS; 
extended support for networking including file sharing, file 
locking, and I/O redirection; and flexible error handling via user 
traps and exits. Plus the library has also been re-engineered 
to produce much smaller executables. 

Try the new Lattice C Compiler. Because C-ing is believing. 


eee Lattice, Incorporated 
ee P.O. Box 3072 


312/858-7950 


Lattice 


INTERNATIONAL SALES OFFICES: 


TWX 910-291-2190 


Glen Ellyn, Illinois 60138 


Circle no. 101 on reader service card. 


Benelux: Ines Datacom (32) 2-720-51-61 Japan: Lifeboat Inc. (03)293-4711 
England: Roundhill (0672)54675 France: SFL (1)46-66-11-55 


Germany: (49)7841/4500 (49)8946/13290 


a7 


ARTICLES 


Series 32000 Cross 
Assembler 


he National Semiconductor 
Dts 32000 microprocessor 





and the 16-bit 32016 (formerly called | 
16032) microprocessors. As part of a 
project to build a board using a 32032, 


I wrote an assembler in Software | — 
Toolworks’ C/80; adaptation to any | — 
: available i in aln 


Although most people lump the ao 


other variant of C should be easy. 


ot Richard RGGMaN 


line includes the 32-bit 32032 | 


te features general zed 


_instructi Di 


68000 and the 32016 together, these - | 


processors are radically different. 
The differences have been summed 
up as ‘‘the 68000 is PDP-11-like, 
whereas the 32000 is VAX-like.”’ The 
32000 includes bit-field, translate, 
procedure enter/return, and other 
high-level instructions in its instruc- 
tion set. 


Basic Program Design 

This program works in a brute-force 
fashion, but it is easy to understand, 
modify, and debug. Each instruc- 
_tion’s binary equivalent is stored in a 
string, with xs where operands need 
to be inserted. A string matcher, 
match( ), matches the opcodes 
against lines in the source file, keep- 
ing matches to wildcards in the buf- 
fer ambig_buffer. Each opcode has 
an option character, opopt, associated 
with it that controls special-case logic 
for some instructions. The data is out- 
put in Intel absolute hex format. Ta- 
ble 1, page 49, shows the definitions 
for the opopt characters and the in- 
struction table format. Table 2, page 
49, shows some examples of instruc- 
tion formats defined using the struc- 
ture in Table 1. 

The 32000 processor, although al- 
lowing absolute addressing, features 
generalized addressing modes avail- 
able in almost all instructions. Two’s- 
complement offsets can be used in 
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three different sizes—7, 14, or 30 bits 


long—as needed. Because these off- 
sets could refer to areas not yet de- 
fined, and the length of the code var- 
ies with the offset, three passes are 
necessary. The first pass gets a coarse 
value of all symbols, the second pass 
then makes the variable offsets the 
right length and corrects the symbol 
values, and the third pass actually 
generates the code. After the first 
pass, the symbol table is sorted; then 
in the second and third passes, a bina- 
ry search is used to find entries more 
quickly. 


Assembler Syntax 

¢ Symbols—This assembler limits line 
length to 128 characters; symbols can 
be up to a whole line long. Labels 
must be followed by a colon and can 
not be reused. The colon must be 
omitted on equates. Values assigned 
with equ can be redefined, however. 
e Pseudo-ops—org must be followed 
by a value. Although the 32000 does 
not require word alignment of code 
or data, it does make some operations 
faster, so an even pseudo-op is provid- 
ed to force the code address to an 
even boundary. 

Define byte, word, double (db, dw, 
dd) must be only one value per line. 
Currently, character-string constants 
are not supported. 

Numeric constants must begin with 
a digit. Default radix is decimal, or the 


value can be followed with an h, g, or 
b for hexadecimal, octal, or binary, re- 
spectively. The code address is known 


Cae 


as “.”, and the assembly address 


(which may be different) as “..”. 


| « Opcodes—All 32000 opcodes are sup- 


ported. The assembly instructions 
must conform to the NS16000 Instruc- 
tion Set Reference Manual—for exam- 
ple, arguments to the SAVE instruction 
must be enclosed in square brackets. 
You can include multiple instructions 
on a line as long as all operands to 
each instruction are provided. 

¢ Comments—Comments begin with 
a semicolon (;) and continue to the 
end of the line. Some programmers 
have the bad habit of omitting the be- 
ginning * or ;. That won't work here. 
e Assembly-time arithmetic—Only 
op OE, "and “/"are supported. 
A look at the listing shows it would be 
trivial to add more operators, howev- 
er. Formulas are allowed anywhere 
a value is required, but they must be 
enclosed in parentheses. Within pa- 
rentheses, values must be separated 
from operators with spaces. This is 
because the program uses the spaces 
to tell where words end, and math 
operators are considered words. 
Spaces are not needed between the 
parentheses and the words enclosed. 
Note the spaces around + and /. An 
example will best illustrate: 


(FEN + 1) + (GUG / 3)) 


Commas also separate words; in 
fact, commas and spaces are inter- 
changeable, although human read- 
ers may consider commas out of 
place in some instances. 
¢ Listing—The assembler produces a 


‘listing on the final pass. This listing is 


sent to the screen but can be redirect- 
ed into a file or to the printer. It is a 
traditional listing, with address, bytes 
of code or data, and opcodes and 
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r bee binary ve should be a cing of bi 5 e.. % 
opcode opopt character is used to specify shea operands, etc. 4 


opopts used here for the 32000 are: 

blank —_ nothing special 

gen 

gen short 
gen gen 
00000 short 
gen gen reg 

 reglist save/enter 
_ reglist restore/exit 
00000 gen (sfsr) 

___ inss/exts 
movs/skps/cmps 
setcfg 
procreg, gen for Ipr/spr 
index (operand order) 

— ret/rett — postbyte 
movm 
exp (disp after instruction) */ 





¢ 
e 

L. 

6. 


- struct (_ : 
a char * onam; /* opcode name */ _ 
_ intoent, : /* operand count, negative if Po-elatve i 
ea ‘obiny /* opcode binary value */ / 
 . ee /* opcode opopt char */ 


Table 1: Definitions of opopt characters 


"02h’, 
"62h’, 
"Oe2h”, 
“Aan. 
. ”XXXxXxXXxXxXX0001 1iib”, 
” sat?”, : ”xxxxx01 100111 1iib”, 
ue, ”"*xxxx01001111111b”, 
ie, : "xxxxx11001111111b", se 
add’, ”¥xXXXXXXxXXxX00000010111110b’, | S . 
ne. "XXXXXXXXxX1 10001 10111110b", 
ff and?’, : ”XXXXXXXXXX101 Oiib”, 
not? ”XxXXXXXXXXX 10011101001110b”, 


Table 2: Selected instruction formats from the opcode table 


unknown item—syntax error 

unimplemented instruction (bad instruction database) 
no length modifier (bad instruction database) 

or expression too complex | 

address extensions missing 


illegal register /pr/spr 
brackets required 
syntax error in value _ 
__unknown arithmetic operator 
undefined symbol _ 


Table 3: Error messages 
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comments on the right. 
Table 3, below, shows the error 
messages produced by the assembler. 


Future Enhancements 

Unless I get some 32000 hardware to 
play with, it’s unlikely I'll work on 
this program further. If you'd like to 
work on it, however, some items on 
your list should be: 


1. Multivalue db/dw/dd and charac- 
ter-string constants. 

2. Global/external object format and 
linker. The 32000 instructions are al- 
ready relocatable; any absolute val- 
ues that would be present would pre- 
sumably be entry points or I/O 
addresses. In fact, even the global/ex- 
ternal isn’t really necessary because 
of the cxp/rxp instructions. 

3. Cseg/dseg pseudo-ops. 


If you send your changes to me, I'll 
be happy to make them available to 
others. Anyone wanting a copy of the 
source code may send me $8 for ma- 
terials and effort. Please specify 8- 
inch CP/M, 54-inch PC, or other (in- 
quire) or 3'2-inch Atari ST. 

For those lucky people who are in 
a position to make use of this pro- 
gram, why not let readers know 
what you're doing? Is the 32000 real- 
ly the programmer's dream some say 
it is? And for those who are in a posi- 
tion to do so, how about some inex- 
pensive 32000 hardware—a single- 
board computer perhaps—so people 
can get a hands-on feel for what the 
processor can do? 

Even if you don't have a 32000 pro- 
cessor to play with, you may be able 
to make use of routines from this pro- 
gram. The style exemplifies my be- 
lief that C should be written to be 
readable both by computers and by 
humans. Cryptic C is bad C. 


DDJ 


Vote for your favorite feature/article. 
Circle Reader Service No. 5. 


The listing for this article is present- 
ed in a machine-readable form—Soft- 
strips produced by Cauzin Systems. 
The strips begin on page 83. The text of 
the listing is available for downloading 
in the DDJ Electronic Edition on Com- 
puServe. A disk with this listing and 
others is also available—see the ad on 
page 115. The text of the listing will be 
published next month. 
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MULTITASKING KERNEL 


| Listing One (Text begins on page 16.) 


/* 

Listing 1 Scheduling Algorithm 

(C) Copyright 1986 Ken Berry. 

All rights reserved. 

Copies may be made for non-commercial, private use only. 
* 


ce 


#define F 0 /* false */ 
#define T 1 /* true */ 

#define E -1 {* Strec:-*7 
#define NULL 0 /* null pointer */ 
typedef char pointer; /* pointer type */ 
typedef char logical; /* logical type */ 


typedef unsigned selector; /* 8086 selector type */ 


It's good for your system. 


struct sys parm /* register storage block for 8086 interface */ 


union {unsigned sys _rax; struct {char sys ral, sys_rah;} sys byt;} sys_ra; 
union {unsigned sys rbx; struct {char sys rbl, sys _rbh;} sys byt;} sys_rb; 
FULLY Int ted union {unsigned sys rcx; struct {char sys rcl, sys rch;} sys byt;} sys re; 
n egra ec, union {unsigned sys rdx; struct {char sys rdl, sys _rdh;} sys byt;} sys rd; 
Data Entry Windows! #define sys ax sys ra.sys rax 
#define sys al sys ra.sys byt.sys ral 
Complete input formatting #define sys ah sys ra.sys byt.sys rah 
Unlimited Validati #define sys bx sys rb.sys rbx 
desea Megha cy apa #define sys bl sys rb.sys byt.sys rbl 
Full attribute control #define sys bh sys rb.sys byt.sys rbh 
Multiple virtual windows #define sys cx sys rc.sys rcx 
Full ‘a tomatic, collision proof overlay and #define sys_cl sys_re.sys_byt.sys_rcl 
ae ee : P y #define sys ch sys rc.sys byt.sys rch 
restore #define sys dx sys rd.sys rdx 
Print to & scroll background windows aed He oie Sete exe Oye syed 
: " ” efine sys dh sys rd.sys byt.sys r 
Animated window “on unsigned sys bp; 7* base pointer */ 
“Loop function” allows processing while await- ere sys di; eG east Snare ey —— */ 
ing 3 unsigned sys _ sp; stack pointer 
ing input unsigned sys cs; /* code segment ic 
| unsigned sys ds; /* data segment * 
AND MUCH MORE! unsigned sys ss; /* stack segment */ 
unsigned sys es; /* extra segment */ 
$1 49 Gs unsigned sys pf; /* 80286 processor flags */ gees ; 
#define SYS OF 0x0800 /* overflow flag- 1: lost significance * 
5 #define SYS DF 0x0400 i® ee flag- 1: ee iste +7 
9 #define SYS IF 0x0200 /* interrupt flag- 1: enable interrupts * 
Includes 100% source, tutorial, reference manual, #define SYS TF 0x0100 /* trap flag- 1: interrupt every instruction */ 
examples, and sample programs. #define SYS SF 0x0080 /* sign flag- 1: result negative */ 
Specify Microsoft, Lattice v2 or v3, Computer = SYS 2F a“ Ds aes ae 1: — ae aaa 
: Mi. efine SYS AF 0x auxiliary carry flag- 1: carry from 
Innovations, Aztec, DeSmet, or Mark Williams. Ask #define SYS PF 0x0004 /* parity flag- 1: even number of 1's */ 
about Unix. #define SYS CF 0x0001 /* carry flag- 1: carry from bit 8 or 16 */ 
unsigned sys sw; /* status word */ 


#define SyS TS 0x0008 
#define SYS EM 0x0004 
#define SYS MP 0x0002 
#define SYS PE 0x0001 


100% Money Back Guarantee 
unsigned sys ip; iy 


NOW ... VCScreen! unsigned sys_res; /* 


Our new interactive screen “painter” actually lets bs 
you draw your data entry windows! Define fields, 
text, boxes & borders. Move them around. Change 


/* task switch */ 
/* processor extension emulation */ 
/* monitor processor extension */ 
/* protection enable */ 

instruction pointer */ 

unused */ 


struct t_xstck 


{ 


attributes. Then the touch of a button generates C unsigned t_xbase; /* application stack base (overflow detection) */ 
: ; ; unsigned t xes; /* es */ 
source code Calls to the Vitamin C routines! cipcenea esc: /* bp */ 
unsigned t_xdi; p= Gt #7 
unsigned t_xsi; f* Gao BF 
unsigned t_xdx; (eae. *7 
*e unsigned t_xcx; {* cx *7 
Requires Vitamin C Library above. For IBM & unsigned t_xbx; /* bx */ 
compatibles unsigned t_xax; i> Qa *¥ 
p unsigned t_xds; /* as */ 
unsigned t_xip; /* ip -*/ 
2 unsigned t_ xcs; /*.ca' */ 
For Orders Or Information, unsigned t_xpf: /* pt */ 

unsigned t_retip; /* return address */ 


(214) 245-6090 : 


struct t task 
Creative Programming Consultants, Inc. ( 


char t type; /* task type */ 
Box 112097 Carrollton, TX 75011-2097 #define T X 0x80 /* execute queue */ 
Include $3 ground, $6 air, $15 overnight ce 1 aS a et. gee +, , 
shipping, $25 if outside USA. Texans add 6%% Ie tae ha prsoraty queue * 
tax All funds must be in U.S. dollars drawn on a ere ae esto (ee oneaey eae Mewue:*7 
Re #define T ATASK 0x01 /* abreviated task */ 
U.S. bank. unsigned t_wttk:; /* wait tick count */ 
unsigned t cls; /* priority queue index */ 


struct t_task *t_pqtsk,*t_nqtsk; /* queue linkage */ 

struct t_task *t_ratsk, *t_pstsk,*t_nstsk,*t_fdtsk,*t ldtsk; /* family */ 
struct sys parm t_ps; /* processor status */ 

unsigned t xtm0; /* execution time accumulator */ 

unsigned t xtml; 

unsigned t_xtm2; 

pointer *t_axstk; /* execution stack pointer */ 

}3 

extern pointer *sys task; /* current task control table pointer */ 

#define tsk ( ( struct t_task * ) sys task ) /* task control table ref */ 


#define T_SCLS 4 /* number of scheduling classes */ 


OCH I 


PROGRAMMING 


struct t_scls 

{ 
unsigned t_sfrq; 
int t_sct; 


/* scheduling class queue */ 


/* scheduling frequency */ 
/* queue length */ 
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struct t_task *t_fqtsk,*t_lqtsk; /* queue header */ 
}e 


struct t_schd /* scheduling control table */ 
{ 
int t xct; /* execution queve length */ 
struct t_task *t fxtsk, *t_lxtsk; /* execution queue header */ 
int to wet: /* wait queve length */ 
struct t_task *t_fwtsk, *t_lwtsk; /* wait queue header */ 
int t_swct; /* secondary wait queve length */ 
struct t_task *t_fswtsk, *t_lswtsk; /* secondary wait queue header */ 
int t_sclsl; /* scheduling class index limit */ 


struct t_scls **t_sclsp; /* scheduling class array pointer */ 
}: 


extern pointer *sys tsch; /* task scheduling control table pointer */ 
#define tschd ( ( struct t_schd * ) sys tsch ) /* quick pointer */ 


/* 
e oXenl /* security kernel */ 
+7 


t), Kren () 
fe 


This is the security kernel. It never returns, being the most trusted 
software in the system. The current contents in t_crtss and t_crtsp 
are used to set the stack for when the current task is resumed. */ 
{ 
extern logical t_astrm; /* tick termination flag */ 
extern selector t_crtss; /* current task ss storage */ 
extern pointer *t_crtsp; /* current task sp storage */ 
extern unsigned tmr_tkct; /* tick clock */ 
int xtskct; /* task queue count (at entry) */ 
int. tte: /* task termination code */ 
_tsk -> t_ps.sys_ss = t_crtss; /* set current task stack */ 
_tsk -> t_ps.sys_ sp = t__crtsp; 
while (_T) 7* find executable task */ 
{ 
xtskct = tschd -> t_xct; /* save task count */ 
if ( t_astrm ) t__wtst( tmr_tkct ); /* process wait tasks */ 
if ( xtskct == 0) t__sch(); /* schedule application tasks if necessary */ 
sys task = _tschd -> t_fxtsk; /* set next task address */ 
if ( sys task != NULL) /* test for executable task available */ 


_tschd -> t_xct--; /* decrement executing task count */ 
tschd -> t_fxtsk = _tsk -> t_nqtsk; /* delink task */ 
If ( _tschd -> t_fxtsk == NULL ) 
_tschd -> t_1xtsk = _NULL; 
else _tschd -> t_fxtsk -> t_pqtsk = NULL; 
_tsk => t_type &= ~T_XxX; /* Indicate task not in execution queue */ 
tte = t__xtsk( sys_task ); /* execute application task */ 
if ( !sys_task ) continue; /* test for task terminated */ 
if ( ttc < 0) t__inxq(): /* insert task into execution queue */ 
else if ( ttc == 0) t_inpq(): /* insert task into priority queue */ 
else t_inwq( ttc ); /* insert into wait queue */ 
} 
} 
} 


/* 
t wtst test waiting tasks 
x 


t__wtst( tc) 
unsigned tc; 
x 


The wait queue is traversed. All tasks with a wait value of tc are executed. 
_F is always returned. */ 


while( T) /* traverse wait queue */ 
{ 
sys task = tschd -> t_fwtsk; /* set current task pointer */ 
if ( !sys_ task ) break; /* test for no waiting tasks */ 
_tsk -> t_type é= ~T_W; /* remove task from wait queue */ 
tsk -> t_type |= T_X; /* indicate task in execution queue */ 
If ( _tsk -> t_wttk > tc ) break; /* test for effective end of list */ 
-- tschd -> t_wct; /* decrement waiting task count */ 
tschd -> t_fwtsk = tsk -> t_nqtsk; /* delink from wait queue */ 
Tf ( tsk -> t_ngtsk == NULL ) 
_tschd -> t_lwtsk = _NULL; 
else tsk -> t_nqtsk -> t_pqtsk = _NULL; 
_tsk -> t_pqtsk = _NULL; 7* insert at top of execution queue */ 
_tsk -> t_nqtsk = tschd -> t_fxtsk; 
_tschd -> t_fxtsk = sys task; 
#+ tschd -> t_xct; /* increment executable task count */ 
if-( _tschd -> t_lxtsk == NULL ) 
_tachd -> t_1xtsk = sys task; 
else tsk -> t_nqtsk -> t_pqtsk = sys task; 


return F; /* return */ 
/* 
t sch schedule task 
x7 
t__sch() 


x 


This function searches the priority queves and links tasks ready for execution 
into the execution queue. The return is always F. */ 


struct t scls **a; /* priority queue pointer array pointer */ 
struct t scls *q: /* priority queue pointer */ 
ant 3, 4¢., /* iteration variables */ 
a= tschd -> t_sclsp; /* set pointer array address */ 
/* while(_T) /* nonterminating task */ 
es 


for (i= 0; i < _tschd -> t_sclsl; ++i ) /* traverse queues */ 


q = a[i); /* set priority queue pointer */ 
for ( 4 = 0; j++<q -> t_sfrq; ) /* schedule tasks from priority queue */ 
{ 
if ( q -> t_fqtsk == NULL ) break; /* test for queue empty af 
if ( tschd -> t_lxtsk ) /* link to end of execution queue */ 
_tschd -> t_lxtsk -> t_nqtsk = q -> t_fqtsk: 


(continued on next page) 
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ANSLSYS REPLACEMENT 


RA QG@Q QQ i A Dodo Deed eDeOrOO*”°a 


MAKE YOUR PC 
SEEM LIKE AN AT! 


MAKE YOUR AT 
SEEM LIKE A 
DREAM MACHINE! 


“ANSI-" 
CONSOLE 


The Integrated Console Utility™ 


FAST, POWERFUL 






For the IBM-PC, AT, and clones 
New Version 2.00 is MUCH FASTER! 
Now blink free scrolling on CGA! 


Now uses EMS/EEMS for Scroll Recall 
New Menu Program for Changing Options 


GET A BOX FULL OF UTILITIES! 
MAKE LIFE EASIER FOR ONLY $75! 
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¢ Speed up your screenwriting 2-6x 
e Extend your ANSI.SYS to full VT100 
e Add many more escape sequences 
¢ Scroll lines back onto screen 

¢ Save scrolled lines into a file 

e Add zip to your cursor keys 

e Free your eyes from scroll blinking 
e Easy installation 

° Get a 43 line screen w/EGA 

¢ Get a 50 line screen wiICGA 

¢ No more annoying typeahead beep 
e Prevent screen phospher burnin 

* Control many programs’ use of color 
¢ Generate breakpts from keyboard 

¢ Shorten that annoying bell 

¢ Over 50 other useful options 


Fast ANSI Console Driver 


“The psychological difference is 
astonishing” 
—Lotus June 85 pg 8. 


‘So many handy functions rolled into 
one unobtrusive package”’ 
—PC-World Feb 86 pg 282. 


“The support provided by the 
publishers is extraordinary” 
—Capital PC Monitor May 86 pg 25. 


‘_. the best choice for improving your 
console...” 
—Capital PC Monitor June 86 pg 26. 


460p Manual (w/slip case) & disks $75. 


Satisfaction Guaranteed! 
Order Yours Today! 


HERSEY MICRO CONSULTING 
Box 8276, Ann Arbor, MI 48107 
(313) 994-3259 VISA/MC/Amex 


DEALER INQUIRIES INVITED 
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COMBINE THE 
RAW POWER OF FORTH 
WITH THE CONVENIENCE 
OF CONVENTIONAL LANGUAGES 


HS 
FORTH 


Why HS/FORTH? Not for speed 
alone, although it is twice as fast as 
other full memory Forths, with near 
assembly language performance 
when optimized. Not even because 
it gives MANY more functions per 
byte than any other Forth. Not be- 
Cause you can run all DOS com- 
mands plus COM and EXE programs 
from within HS/FORTH. Not be- 
Cause you Can single step, trace, de- 
compile & dissassemble. Not for the 
complete syntax checking 8086/ 
8087/80186 assembler & optimizer. 
Nor for the fast 9 digit software float- 
ing point or lightning 18 digit 8087 
math pack. Not for the half mega- 
byte LINEAR address space for 
quick access arrays. Not for com- 
plete music, sound effects & graph- 
ics support. Nor the efficient string 
functions. Not for unrivaled disk flex- 
ibility — including traditional Forth 
screens (sectored or in files) or free 
format files, all with full screen edi- 
tors. Not even because I/O is as 
easy, but far more powerful, than 
even Basic. Just redirect the charac- 
ter input and/ or output stream any- 
where — display, keyboard, printer 
or com port, file, or even a memory 
buffer. You could even transfer con- 
trol of your entire computer to a 
terminal thousands of miles away 
with a simple >COM <COM pair. 
Even though a few of these reasons 
might be sufficient, the real reason 
is that we don’t avoid the objections 
to Forth — WE ELIMINATE THEM! 


Public domain products may be 
cheap; but your time isn’t. Don’t 
shortchange yourself. Use the best. 
Use it now! 


HS/FORTH, complete system: $395. 
with “FORTH: A Text & Reference” 
by Kelly and Spies, Prentice-Hall 
and “The HS/FORTH Supplement” 
by Kelly and Callahan 


ore Visa Mastercard 


HARVARD 
SOFTWORKS 


PO BOX 69 
SPRINGBORO, OH 45066 
(513) 748-0390 
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MULTITASKING KERNEL 


Listing One (Listing continued, text begins on page 16.) 


else tschd -> t fxtsk = q -> t_fqtsk; 
q -> t_fqtsk -> t_type &= ~T_P; /* indicate not in priority queve */ 
q -> t_fqtsk -> t_pqtsk = tschd -> t_lxtsk; 
tschd -> t lxtsk = q -> t fqtsk; 
q -> t_fqtsk = q -> t_fqtsk -> t_nqtsk; /* update queue header */ 
tschd -> t_lxtsk -> €_nqtsk = NULL; 
if ( q -> t_fqtsk == NULL ) 
.  @q -> t_lqtsk = _NULL; 
else q -> t_fqtsk -> t_pqtsk = NULL; 
gq -> t_ sct --; /* decrement queue count */ , 
++ tschd -> t xct; /* increment execution queue length */ 
tschd -> t_lxtsk -> t_type |= T_X; /* ind. task in execution queue */ 
} 


} 
{> t_rels(); 
Fy 
return (fF; 
} 


/* 
Co 
“7- nxq 


/* return to bottom of execution queue */ 


/* return */ 


insert task into execution queue 
t inxq() 
Ii 


The current task is inserted into the execution queve. F is always returned. 
tf 


{ 
tsk -> t wttk = 0; /* indicate not waiting for system tick */ 
If ( _tschd -> t_lxtsk — NULL ) /* test for execution queue empty */ 


{ 
_tschd -> t_fxtsk = sys task; /* insert in empty queue */ 
_tsk -> t_pqtsk = NULL; 

} 


else /* execution queue not empty */ 


_tschd -> t_lxtsk -> t_nqtsk = sys task; /* insert at end of queue */ 
_tsk -> t_pqtsk = tschd -> t_lxtsk; 


tsk -> t_nqtsk = NULL; /* new task at end of list */ 
tschd -> t_lxtsk = sys _ task; 
tschd -> t_xctt+; 7* increment executable task count */ 


_tschd -> t_1xtsk -> t_type |= T_x; /* indicate task in execution queue */ 


ah 


return F; /* return */ 
} 
/* 
t secw process secondary wait queue 
+7 
t secw() 
/* 


This program executes every 64K system ticks. It moves the secondary 
wait queue to the primary wait queue and changes the type of the waiting 
tasks. */ 
{ 
struct t_task *tsk; 
char swtflg; 
while( T) 
{ 
t__syntr( &swtflg ); /* enter system state */ 
for ( tsk = tschd -> t_fwtsk; tsk; tsk = tsk -> t_nqtsk ) /* traverse */ 
{ 


/* task control table pointer */ 
/* system state flag */ 
/* nonterminating task */ 


tsk -> t_type &= ~T_SW; 

tsk -> t_type |= T_W; /* change task type */ 
} 
tschd -> t_wct = tschd -> t_swcet; /* append secondary wait queue */ 
tschd -> t_fwtsk = tschd -> t_fswtsk: 
tschd -> t_lwtsk = tschd -> t lswtsk; 
tschd -> t_fswtsk = tschd -> t_lswtsk = NULL; /* empty sec. queue */ 
_tschd -> t_swcet = 0; 
t__inwq( OxFFFF - tmr_tkct ); /* insert self into wait queue at end */ 
sys_task = NULL; 7* remove task from kernel control */ 


t_term(); /* suspend execution */ 

} 
} 
/* 
t-inwd insert task into wait queue 
x 
t__inwq (tc) 
unsigned tc; 
/* 


The current task is inserted into the wait queue. tc is the number of system 
ticks that the task is to wait. F is always returned. */ 
{ 
extern unsigned tmr_tkect; /* tick clock */ 
unsigned crtk; /* current tick */ 
crtk = tmr_tkct; /* set current system tick */ | 
tsk -> t_wttk = tc + crtk; /* compute reactivation time */ 
Tf ( tsk -> t_wttk >= crtk ) /* test for task in wait queue */ 
{ t_Inwt( & tschd -> t_wct ); /* insert in wait queue */ 
_tsk -> t_type |= T We | 
jelse /* task in secondary wait queue */ 
{ t_inwt( & tschd -> t_swet ); /* insert in secondary wait queue */ | 
_tsk -> t_type I= T_SW; | 
}return F; /* indicate task inserted */ 
/* . 
t inwt insert into wait or secondary wait queue 


struct t_wtq 
{ 


int wet; /* wait queue length */ 
struct t_task *frs,*lst; /* queue header */ 


}: 
t__inwt( w ) 
struct t_wtq *w; 
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/* 
The t wtq structure is implicitly contained in the scheduling control table 

(t_schd structure). The current task is inserted into the queue. F is always 
returned. */ i 


struct t_task *p; /* task pointer */ 

unsigned tc; /* reactivation time */ 

tc = tsk -> t_wttk; /* set reactivation time */ 
++w -> wet; /* increment queue length */ 


for (p=w-> frs; p; p= p -> t_nqtsk ) /* traverse queue */ 
{ 
if ( te <p —-> t_wttk ) /* test for task earlier */ 
{ 
_tsk -> t_nqtsk = p; /* insert within queue */ 
_tsk -> t_pqtsk = p -> t_pqtsk; 
p -> t_pqtsk = sys task; 
if ( (p= _tsk -> t_pqtsk ) ) p -> t_nqtsk = sys task; 
else w -> frs = sys task; 
return F; 7* indicate task inserted */ 
} 


} 
if ( (p=-w-> lst ) ) /* test for wait queve not empty */ 
{ 


p -> t_nqtsk = w -> lst = sys task; /* insert at end of queue */ 
_tsk -> t_pqtsk = p; 
_tsk -> t_nqtsk = NULL; 
} 
else 
{ 
w -> frs = w -> lst = sys task; /* initialize wait queue */ 
_tsk -> t_nqtsk = tsk -> t_pqtsk = NULL; 
} 
return F; 
} 
/* 
t.in 
wo 


/* wait queue empty */ 


/* indicate task inserted */ 


insert into priority queue 

t  inpq() 

ft 

The current task is inserted into its priority queve. F is always returned. 
: a 


{ 
struct t_scls *q: /* priority queue pointer */ 
_tsk -> t_wttk = 0; /* indicate not waiting for tick */ 
q = tschd -> t_sclsp[ tsk -> t_cls ]; /* set priority queue address */ 
_tsk -> t_pqtsk = q -> t_lqtsk;: 7* link task into priority queue */ 
tsk -> t_nqtsk = NULL; 
If ( q -> t_lqtsk = NULL ) q -> t_fqtsk = sys task; 
else q -> t_lqtsk -> t_nqtsk = sys task; . 
q -> t_lqtsk = sys task; o 
++q -> t_sct; /* increment queue length */ 
_tsk -> t_type |= T_P; /* indicate task in priority queue */ 
return F; /* rata *f 
} 


/* 
t xtsk 
*7- 
t__xtsk( t ) 
struct. t task *t: 
ae a 
Task t is executed. The returned value is the termination code. 
=f 
{ 

extern unsigned t_mnxtm: /* minimum execution time */ 

extern unsigned t_syxtm[]; /* system pseudo time accumulator */ 

extern logical t_astrm; /* application termination flag */ 

/* 


execute task 


int ‘tte: return value storage */ 

unsigned atm; /* accumulated time */ 

unsigned rtm; /* reference time */ 

int xtm; /* execution time */ 

atm = 0; /* initialize accumulated execution time */ 
while(_T) /* execute task */ 


{ 
rtm=t -> t_xtm0; /* set reference time */ 
t_rtmark( &t -> t_xtm0 ); /* accumulate pseudo time */ 
ttc = t__dspap( t -> t_ps.sys_ss, t -> t_ps.sys_ sp ); /* execute task */ 
t -> t_ps.sys_ss = t_crtss; /* store ss */ 
t -> t_ps.sys sp = t_crtsp; /* store sp */ 
t_rtmark( &t_syxtm ); /* accumulate pseudo time */ 
if ( ( tte != 0) If !t_astrm ) break; /* test for not tick termination */ 
xtm = t -> t_xtm0 - rtm; /* compute execution time */ 
if ( xtm < rtm) xtm = -xtm; 
atm += xtm; /* accumulate execution time */ 
if ( atm >= t_mnxtm ) break; /* test for minimum time satisfied */ 
return ttc; /* return */ 
Pe 
ee eke initialize task system 
x 
Ande) 
/* 


This function initializes the task system. F is the normal return. E is 
returned if the system cannot be initialized. */ 
{ 
#define WSTK 252 /* t_wqupd stack size */ 
extern struct sys parm sys stat; /* initial processor status ny 
extern struct t task *t wqupd; /* secondary wait queue update task */, 
extern selector sys dgrp:; /* data segment selector storage */ 
extern char *sys_ssbs; /* system stack pointer */ 
extern unsigned sys_sssz; /* system stack length */ 
extern char tmr_ilck; /* tick service interlock */ 


int t__secw(); /* wait queue update function */ 

struct t_scls *cls; /* priority queue pointer */ 

struct t scls **ary; /* priority queue pointer array pointer */ 
tae Ag /* iteration variable */ 

char *s; /* pointer */ 

tmr int(); /* initialize system tick clock */ 


‘sys task = sys ssbs + sys_sssz; /* set main task control table pointer */ 
_tsk -> t_xtm0 = /* initialize execution time */ 
tsk -> t_xtml = 


_tsk -> t_xtm2 = 0; (continued on next page) 
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SQL Compatible Query System adaptable to any 
operating environment. 








































CQL Query System. A subset of the Structured 
English Query Language (SEQUEL, or SQL) 
developed by IBM. Linked files, stored views, 
and nested queries result in a complete query 
capability. File system interaction isolated in an 
interface module. Extensive documentation 
guides user development of interfaces to other 
record oriented file handlers. 


Portable Application Support System 





Portable Windowing System. Hardware 
independent windowing system with borders, 
attributes, horizontal and vertical scrolling. 
User can construct interface file for any 
hardware. Interfaces provided for PC/XT/AT 
(screen memory interface and BIOS only 
interface), MS-DOS generic (using ANSI.SYS), 
Xenix (both with and without using the curses 
interface), and C-library (no attributes). 





Screen 1/0, Report, and Form Generation 
Systems. Field level interface between 
application programs, the Query System, and 
the file system. Complete input/output 
formatting and control, automatic scrolling on 
screens and automatic pagination on forms, 
process intervention points. Seven field types: 
8-bit unsigned binary, 16 bit signed binary, 16 
bit unsigned binary, 32 bit signed binary, 
monetary (based on 32 bit binary), string, and 
date. 


$395.00 


C Interpreter. Run the interpreter on any 
hardware and on any operating system. 
Develops true intermediate code, allowing full 
C features in an interpreter. User configurable 
interface to compiler library allows linkage 

with compiled routines. 


HARDWARE AND FILE SYSTEM 
INDEPENDENT 





“KURTZBERG 
GoMPUTER SYSTEMS 


41-19 BELL BLVD. 
BAYSIDE, N.Y. 11361 


VISA/Master Charge accepted 


(718) 229-4540 


*C-tree is a trademark of FairCom 





IBM, SEQUEL, PC, XT, AT are trademarks of IBM Corp. 
MS-DOS and Xenix are trademarks of Microsoft Corp. 


CQL and the CQL Logo are trademarks of Kurtzberg Computer 
Systems. 
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Byte Magazine called it. 


“CIARCIA’S 
SUPER 
SYSTEM". 


The SBI80 
Computer/Controller 


Featured on the cover of Byte, Sept. 1985, 
the SB180 lets CP/M users upgrade to a 
fast, 4’ x 7/2” single board system. 


© 6MHz 64180 CPU 


(Z80 instruction superset), 256K RAM, 
8K Monitor ROM with device test, disk 
format, read/write. 
e@ Mini/Micro Floppy Controller 
(1-4 drives, Single/Double Density, 
1-2 sided, 40/77/80 track 3%’) 5%"' 
and 8” drives). 
@ Measures 4’’ x 7%"; with mounting holes 
@ One Centronics Printer Port 
® Two RS232C Serial Ports 
(75-19,200 baud with console port 
auto-baud rate select). 
© Power Supply Requirements 
+5V +/-5% @500 mA 
+12V +/- 20% @40mA 
© ZCPR3 (CP/M 2.2/3 compatible) 
® Multiple disk formats supported 
e@ Menu-based system customization 





$B180-1 


$B180 computer board w/256K 
bytes RAM and ROM monitor 


SP os sass cpaitvinuccua aii ie sans $369.00 
$B180-1-20 

same as above w/ZCPR3, ZRDOS 

and BIOS source............. $499.00 


-Quantity discounts available- 





new 
COMM180-M-S 


optional peripheral board adds 
1200 bps modem and SCS! 
hard disk interface. 





TO ORDER 
CALL TOLL FREE TELEX 
1-800-635-3355 643331 


For technical assistance or 
to request a data sheet, call: 


1-203-871-6170 


& 
SE Micromint, Inc. 


25 Terrace Drive 
Vernon, CT 06066 
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MULTITASKING KERNEL 





Listing One (Listing continued, text begins on page 16.) 


if( ( sys_tsch = mm_aloc( sizeof( struct t_schd ) ) ) == _NULL )goto errl; 

if( ( ary = mm_aloc( T_SCLS*( sizeof( struct t_scls )+2) ) ) 

— NULL )goto err2; 

_tsk -> t_pqtsk = 
tak -> t ngtsk = 
_tsk -> t_ratsk = 
tsk -> t_pstsk = 
tsk -> t_nstsk = 
tsk -> t_fdtsk = 
0; 


/* NULL linkage */ 


tsk -> t ldtsk 
tsk -> t cls = /* set priority class 0 */ 
“tsk -> t wttk = 0; /* indicate not waiting */ 
for( i= 0, s = & tsk -> t_ps; 
it++<sizeof( struct sys _parm ); )*s = 0; /* clear t_ps */ 
tsk -> t_ps.sys_cs = sys stat.sys_ cs; /* set selectors */ 
tsk -> t_ps.sys ds = 
tsk -> t_ps.sys es = 
tsk -> t_ps.sys ss = sys dgrp; 
tsk -> t axstk = NULL; 7* NULL execution stack pointer */ 
tschd -> t_ xct = I; /* set execution task count */ 
_tschd -> t_fxtsk = /* set execution queue */ 
tschd -> t lxtsk = sys task; 
_tschd -> t wet = 0; 7* indicate idle wait queue */ 
_tschd -> t_fwtsk = /* set wait queue */ 
tschd -> t lwtsk = NULL; 
_tschd -> t_swct = 0; /* indicate empty secondary wait queue */ 
_tschd -> t fswtsk = /* NULL secondary wait queue */ 
_tschd -> t_lswtsk = NULL; 
_tschd -> t_sclsl = T_SCLS; /* set priority queue count */ 
_tschd -> t_sclsp = ary; /* set priority queue pointer array address */ 
cls = sary[ T.SCLS }; /* set first t_scls pointer */ 
for( 1 = 0; 41<T_SCLS; ++i, ++cls ) /* initialize priority queues */ 
{ 


_NULL; 


ary{i) = cls; /* set priority queue pointer */ 
cls -> t_sfrq = 1; /* set default frequency */ 
cls -> t_sct = 0; /* indicate empty queue */ 
cls -> t_fqtsk = /* NULL queue linkage */ 
cls -> t_lqtsk = NULL; 
} 
t_wqupd = /* create task to update wait queue */ 


t_crt( t secw, 0, 0, WSTK, 0, 0, 
if( t_wqupd == NULL )goto err3; 
t_wqupd -> t_wttk = OxFFFF; /* update wait queue at wraparound time */ 


ae 


t__dspsy(); /* dispatch system */ 

tmr_ilck = 0x00; /* enable tick service */ 

return F; /* indicate task system initialized */ 
err3: mm free( ary ); /* error nest */ 


err2: mm _free( sys tsch ); 
errl: return E; 


} 


/* 
t term 
* 


t term() 
fx 


The task system is terminated. All tasks and storage allocated by t__init are 
released. The return is always F. */ 


{ 


extern char *sys ssbs; /* system stack base */ 
extern unsigned sys _sssz; /* system stack size */ 


struct t_task *t; /* t_task pointer */ 
char trmflg; /* system state flag storage */ 
tmr_ rst(); /* reset system tick clock */ 


t__syntr( &trmflg ); /* enter system state */ 

sys_task = sys ssbs + sys sssz; /* set original task address */ 

while( ( t = tsk -> t_fdtsk ) ) /* delete all created tasks */ 
t_del( t, F); 

mm_free( tschd -> t_sclsp ); 

mm_free( sys tsch ); 


return F; /* normal return */ 
} 
/* 
t. crt create task 
«7 


t_crt( xadr, pent, padr, ssiz, dsiz, sadr, prty ) 
pointer *xadr; 

unsigned pcnt; 

unsigned *padr; 

unsigned ssiz, dsiz; 

pointer *sadr; 

unsigned prty; 

/* 


A 


xadr. 
are 

bytes 
that no dynamic memory is required. 
the 


returned if insufficient memory is 


new task is created with execution priority prty. Execution will begin at 
pent parameters will be passed (on the new task stack). The parameters 
in an array addressed by padr. The new task will have a stack of ssiz 
and a dynamic memory area of dsiz bytes. dsiz may be zero to indicate 
sadr will recieve a termination code when 
NULL, an abreviated task is created. F is 


available. Otherwise the address of the 


task terminates. If sadr is 


t_ftask table is returned. */ 


{ 


extern int t_halt():; /* return address */ 


struct t_task *tsk; /* task control table pointer (t_task) */ 
struct t scls *pq; /* priority queue pointer */ 

struct t_xstck *sp; /* execution stack pointer */ 

pointer *ss; /* stack start */ 

unsigned *pr; /* parameter pointer */ 

unsigned ln; /* task control table length */ 

int i: /* iteration variable */ 

char *s; /* pointer */ 

char *sptr; /* execution stack pointer */ 

logical crtflg; /* system state flag storage */ 


t__syntr( écrtflg ); /* enter system state */ 


ln = sizeof( struct t task ); /* allocate task control table */ 
if( ( tsk = mmaloc( In ) ) == NULL ) goto errl; 


ssiz += sizeof( struct t_xstck ); /* allocate stack */ 


(continued on page 56) 
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Now You Know Why 
BRIEF is BEST 


“BRIEF is simple to learn and use and extremely sophisticated.” 
PC Magazine, July 1986 


The Program 


Editor with 
the BEST 
Features 


Since its introduction, 
BRIEF has been sweep- 
ing programmers off 
their feet. Why? 
Because BRIEF offers the 
features MOST ASKED 
FOR by professional 
programmers. In fact, 
BRIEF has just about 
every feature you've 
ever seen or imagined, 


. JOURNAL 
undo fac 

the last. 
/ number c 


commands. 
/ out of RAM 





Every Feature You Can Imagine mS 


Compare these features 
with your editor (or any 
other for that matter). 

e FAST 
e Full UNDO (N Times) 


Unlimited File Size 
-(even 2 Meg!) 
Reconfigurable Keyboard 
Context Sensitive Help 


Program Editing 
YOUR Way 


A typical program editor 
requires you to adjust 
your style of programming 
to its particular require- 
ments - NOT SO WITH 
BRIEF. You can easily 
customize BRIEF to your 
way of doing things, 
making it a natural ex- 
tension of your mind. 
For example, you can 
create ANY command and 
assign it to ANY key - 
even basic function keys 
such as cursor-control 
keys or the return key. 


. SF a e Search for ‘‘regular 

ee oe . * Edit Multiple Large Files expressions’ Q The Experts Agree 
k x 4 sce) : ¢ Compiler-specific eoMinean Ken Revi BYTE 
eyboard assignments, support, like auto es eviewers al 

and commands to ssignments INFOWORLD, DATA 


YOUR preference. One 
reviewer (David Irwin, 
DATA BASED ADVISOR) 
put it most aptly, 
‘‘(BRIEF). . .is quite 
simply the best code 
editor I have seen.’ 


Solution 


ystems ”™ 


indent, syntax check, 
compile within BRIEF, 
and template editing 
Exit to DOS inside BRIEF 
Uses all Available Memory 
Tutorial 
Repeat Keystroke 
Sequences 
e 15 Minute Learning Time 
e Windows (Tiled and 
Pop-up) 


Horizontal Scrolling 
Comprehensive Error 
Recovery 

A Complete Compiled 
Programmable and 
Readable Macro Language 
EGA and Large Display 
Support 

Adjustable line length 
up to 512 


MONEY-BACK GUARANTEE 
Try BRIEF ($195) for 30 days — If not satisfied get a full refund. 


TO ORDER CALL (800-821-2492) 


SOLUTION SYSTEMS, 335-D WASHINGTON ST., NORWELL, MA 020061, 617-659-1571 


Circle Reader Inquiry Number 142 


BASED ADVISOR, and DR. 
DOBB’S JOURNAL all came 
to the same conclusion - 


BRIEF IS BEST! 


Further, of 20 top in- 
dustry experts who were 
given BRIEF to test, 15 
were so impressed they 
scrapped their existing 
editors! 


STED i 
wot COPY pROTECTE 
Z 


BRIEF is a trademark of UnderWare 


Is Your Program 


HALF-FAST? 


Speed It up 
with 


THE® WATCHER 


An execution profiler 
for IBM PCs 
and compatibles. 


Most programs run at less than 
half the speed that they could. 
You can optimize almost any 
code, but where do you start? 


A typical program spends 
90% of its time in 10% of 
its code. The Watcher 
identifies that critical 10% 
for you, so you don’t 
waste your effort on the 
wrong 90%. 


The Watcher is easy to learn 
and easy to use, and we provide 
full technical support. Watcher 
users have increased program 
performance by as much as 
300%. You can get similar 
results. 


The Watcher works with any 
non-interpretive language on 
DOS version 2 or 3. 


Turbo Pascal users: A 
special section of our 

manual is dedicated to 
you! 


only 
$59.95 


Plus $3.00 
Shipping & 
Handling. 


To order or for free information, 
call or write: 


SOFTWARE 


Forest Road 
Wilton, New Hampshire 03086 


(603) 654-2525 
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Listing One (Listing continued, text begins on page 16.) 


if( ( ss = tsk -> t_axstk = mm_aloc( ssiz ) ) == _NULL )goto err2; 
tsk -> t type = T ATASK; /* indicate abreviated task control table */ 
tsk -> t wttk = 0; /* indicate not waiting */ 
tsk -> t ratsk = sys task; /* task family linkage */ 
tsk -> t_pstsk = tsk -> t_ldtsk; 
tsk -> t_nstsk = 
tsk -> t_fdtsk = 
tsk -> t_ldtsk = NULL; 
tsk -> t_ldtsk = tsk; 
If( tsk -> t_pstsk == NULL ) tsk -> t_fdtsk = tsk; 
else tsk -> t_pstsk -> t_nstsk = tsk; 
if( prty > _tschd -> t_sclsl ) /* adjust priority */ 
prty = tschd -> t_sclsl-1; 
tsk -> t cls = prty: /* set priority */ 
pq = _tschd -> t_sclsp[ prty ]; /* set scheduling array pointer */ 
++pq -> t sct; /* scheduling linkage */ 
tsk -> t_pqtsk = pq -> t_lqtsk; 
tsk -> t nqtsk = NULL; 
if( tsk => t_pqtsk == NULL )pq -> t_fqtsk = tsk; 
else tsk -> t_pqtsk -> t_nqtsk = tsk; 
pq -> t lgqtsk = tsk; 
tsk -> = xtm0 = /* no execution time yet */ 
tsk -> t_xtml = 
tsk -> t xtm2 = 0; 
pr = sptr = sstssiz-2*pcnt; /* initialize execution stack & t_ps */ 
tsk -> t_ps.sys_sp = 
sp = sptr - sizeof( struct t_xstck ); 
sp -> t_xbp = ss + ssiz; 
8p -> t_xbase = 858; 
while( pent-- )*pr++ = *padr++; 
for( i= 0, s = &tsk -> t_ps; i++ < sizeof( struct sys parm ); )*s = 0; 
tsk -> t_ps.sys_ds = 
tsk -> t_ps.sys_es = 
tsk -> t_ps.sys_ss = 
sp -> t xds = 
sp -> t xes 
sp -> t xdi 
sp -> t xsi 
sp -> t xdx 
sp -> t xcx 
sp -> t xbx 
sp -> t_xax = NULL; 
sp -> t xip = xadr; 
tsk -> t_ps.sys_cs = 
sp -> t_xcs = 
tsk -> t_ps.sys_cs; 
tsk -> t_ps.sys pf = 
sp -> t_xpf = SYS_IF; 
tsk -> t_ps.sys ip = 
sp -> t_retip = &t_ halt; 
t  syxit( é&crtflg ); /* exit system state */ 
return tsk; /* return */ 


_tsk -> t_ps.sys ds; 


err3: mm_free( tsk -> t_ps.sys ss ); 
err2: mm_free( tsk ); 
errl: t__syxit( écrtflg ); 


return NULL; 


/* 
t halt terminate task 
+77 


t  halt() 
/* 


If a subtask returns into its orginal stack, control will pass to t_halt. 
This function deletes the subtask and then clears the sys task pointer just 
before returning on the system stack (to reenter the security kernel). */ 


logical haltflg; /* system state flag storage */ 

t__syntr( &haltflg ); /* enter system state */ 

t_rtmark( & tsk -> t_ratsk -> t_xtm0 ); /* accumulate pseudo time */ 
t_del( sys task, F ); /* delete current task */ 


sys_task = NULL; /* indicate task terminated */ 
while(_T)t_term(): /* return-to security kernel */ 
} 
/* 
t_ del delete task 
a] 


t_del( tsk, st ) 
struct t_ task *tsk; 
int st: 

/* 


Task tsk is killed. st is the status returned to the calling program. 


Ei 


{ 

#define tskf ( ( struct t_ftask * )tsk ) /** (t_ftask) */ 
struct t_task *t; 7* task control table pointer */ 
logical delflg; /* system state flag storage */ 
t syntr( é&delflg ): /* enter system state */ 


while( ( t = tsk -> t_fdtsk ) )t_del( t, st ); /* delete subtasks first */ 
if( tsk -> t_pstsk )  /* family linkage */ 

tsk -> t_pstsk -> t_nstsk = tsk -> t_nstsk; 
else tsk -> t_ratsk -> t_ldtsk = tsk -> t_nstsk; 
if( tsk -> t_nstsk ) 

tsk -> t_nstsk -> t_pstsk = tsk -> t_pstsk; 
else tsk -> t_ratsk -> t_fdtsk = tsk -> t pstsk; 
if( tsk -> t_pqtsk ) /* queue linkage */7 

tsk -> t_pqtsk -> t_nqtsk = tsk -> t_nqtsk; 
else if( ( tsk -> t_typesT P ) 

&& ( tschd -> t_sclsp[ tsk -> t_cls ] -> t fqtsk == tsk ) ) 
_tschd -> t_scisp[ tsk -> t_cls ] -> t_fqtsk = tsk -> t nqtsk; 
else if( ( tsk -> t_typesT W) && ( tschd -> t_fwtsk == tsk )) 
tschd -> t_fwtsk = tsk -> t_nqtsk; 


else if( ( tsk -> t_typesT_sw) && ( tschd -> t_fswtsk — tsk ) ) 
tschd -> t_fswtsk = tsk -> t ngtsk; 


else if( ( tsk -> t_typesT_x ) && ( tschd -> t_fxtsk — tsk ) ) 
_tschd -> t_fxtsk = tsk -> t_nqtsk; (continued on page 58) 
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ISN’T IT A PITY... 


Everything Isn’t As 


Accommodating As 


FILE HANDLER 


Performance and Portability 


For all the time you devote to developing 
your new programs, doesn't it make sense fo 
insure they perform like lightning and can be 
ported with ease? 


c-tree: Multi-Key ISAM Functions 
For Single User, Network, & Multi 
Tasking Systems 


Based on the most advanced B+ Tree routines 
available today, c-tree gives you un- 
matched keyed file accessing performance and 
complete C Source Code. Thousands of profes- 
sional C programmers are already enjoying 
c-tree’s royalty-free benefits, outstanding 
performance, and unparalleled portability. 


Only FairCom provides single and multi-user 
capabilities in one source code package, 
including locking routines for Unix, Xenix, and 
DOS 3.1., for one low price! In addition, 
c-tree supports fixed and variable record 
length data files; fixed and variable length key 
values with key compression; multiple indices 
in a single index file; and automatic sharing of 
file descriptors. 


r-tree: Multi-Fle Report Generator 


r-tree builds on the power of c-tree 
to provide sophisticated, multi-line reports. 
Information spanning multiple files may be 
used for display purposes or to direct record 
selection. You can develop new reports or 
change existing reports without programming 
or recompiling and can use any text editor fo 





Os! 


c-tree / r-tree 


ie 
& 3 Complete C Source Code & No Royalties! 


Xenix is a registered trademark of Microsoft Corp. Unix is a registered trademark of AT&T 


REPORT GENERATOR 


create or modify r-tree report scripts 
including the complete report layout. Af your 
option, end users may even modify the report 
scripts you provide. 


Unlimited Virtual Fields; Automatic File 
Traversal 


r-tree report scripts can define any number 
of virtual fields based on complex computational 
expressions involving application defined data 
objects and other virtual fields. In addition, 
r-tree automatically computes values 
based on the MAX, MIN, SUM, FRQ, or AVG of 
values spread over multiple records. r-tree 
even lets you nest these computational func- 
tions, causing files from different logical levels 
to be automatically traversed. 


Unlike other report generators, r-tree allows 
you to distribute executable code capable of 
producing new reports or changing existing 
reports without royalty payments, provided the 
code is tied to an application. Your complete 
source code also includes the report script 
interpreter and compiler. 


How To Order 


Put FairCom leadership in programmers utilities 
to work for you. Order c-tree foday for 
$395 or r-tree for $295. (When ordered 
together, r-tree is only $255). For VISA, 
MasterCard and C.0.D. orders, call 314/445- 
6833. For e- tree benchmark comparisons, 
write FairCom, 2606 Johnson Drive, Columbia, 
MO 65203. 


Circle no. 93 on reader service card. 
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or 





Read what they're saying about 
this new concept in prototyping 
and demo-making: 


‘‘A winner right out of the 
starting gate. After you use 
DEMO once, you’ll wonder how 
you got along without it.”’ 

— PC Magazine, 4/29/86 


‘“‘Everybody who writes 
software, either commercially 
or for in-house applications, 
should immediately order a 
copy. Period. No exceptions.” 

— Soft+letter, 4/20/86 


‘Its low price, superb 
performance, and range of 
applications practically 
guarantee that it will be widely 
used. Four Floppy Rating (8.0)”’ 

— InfoWorld, 3/31/86 


‘“‘Apparently has a hit on its 
hands with...a development 
tool for personal computer 
software that has won rave 
reviews from early users.”’ 

— Computerworld, 4/7/86 


tA gem.” 
— PC Week, 3/18/86 


Product of the Month 
— PC Tech Journal, 3/86 eb 


Thousands of developers are de- 
signing better products faster and 
producing more effective demon- 
strations using Dan Bricklin's Demo 
Program. You can, too. Act now! 


ONLY $74.95 
617-332-2240 


Massachusetts residents add $3.75. Outside of the 
U.S.A. add $15.00. 

Requires 256k IBM PC/compatible, DOS 2.0 or 
later. Supports Monochrome, Color/graphics, and 
EGA Adaptors (text mode only). 





SOFTWARE 
GARDEN 


Dept. D 


PO. Box 373, Newton Highlands, MA 02161 
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COMPLETE SOURCE CODE INCLUDED! 


ICXPDS: eXchanger now supports the 5 1/47PDS format. Manipulation 
of ISIS-II files using your computer system was never easier. 


ICXMDS: Same as ICXPDS, but for MSD 8" systems. 
IMXPDS: ReadsMWrites 5" iPDS disks on PC's and AT's. 


TELEDPLUS: Enhanced serial file transfer program for CP/M, SIS, 
or MS-DOS. 


ISE: Emulator gives the CP/M and MS-DUS user access to all the ISIS-II 


languages and utilities. 
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Listing One (Listing continued, text begins on page 16.) 


if( tsk -> t_nqtsk )tsk -> t_nqtsk -> t_pqtsk = tsk -> t_pqtsk; 
else if( ( tsk -> t typesT P ) 
&& ( tachd -> t sclsp[ tsk -> t cls ] -> t lqtsk == tsk ) ) 
tschd -> t_sclsp[tsk -> t_cls] -> t_lqtsk = tsk -> t_pqtsk:; 
else if( ( tsk -> t_typesT W) && ( _tschd => t_fwtsk — tsk ) ) 
tschd -> t_lwtsk = tsk -> t_pqtsk; 
else if( ( tsk -> t_type&sT_ SW) && ( tschd -> t_fswtsk — tsk ) ) 
tschd -> t_lswtsk = tsk -> t_pqtsk; 
else if( ( tsk -> t_type&T_X ) && ( _tschd -> t_fxtsk — tsk ) ) 
tschd -> t_1lxtsk = tsk -> t_pqtsk; 
t = sys task; /* save current t_task pointer */ 
sys_task = tsk -> t_ratsk; /* set ancestor task */ 


mm_free( tsk -> t_ps.sys_ss ); /* free stack */ 
mm_free( tsk ); /* free t_task table */ i 
$89 each sys task = t; /* restore current task pointer */ 
$250 any 3 above t syxit( &delflg ); /* exit system state */ 
UDI: The 8086 ISIS Emulator runs all UDI applications. return F; /* return */ 
DRE EE PERE I RT ER EE I TES LI EIS IS ESTES RE SE II SELEY NERO RITE 
ZAS Development Package: Z-8 and Z-8000 


Assembler for CP/M, ISIS, and MS-DOS. /* 


mm aloc 
Request a catalog of our products! Wf 


Copyrights CP/M Digital Research. Inc 
ISIS-Il and 1PDS Intel Corp - MSDOS Microsoft 
eT ee rae eee rts eee Sane sae 


Western Lares 303-327-4898 


BoxC * Norwood. CO 81423 


ACCELER 8/16: CP/M-80 emulator for MS-DOS. Enables PC's 
to run ISE. (no source code, V-20 ind.) 


memory allocation 


mm_aloc (lin) 
unsigned ln; 
* 


in bytes are allocated from the heap. The address of the first byte is 
returned. If there is not enough available memory to satisfy the request, 
_NULL is returned. */ 

{ 


return malloc(in); /* allocate storage */ 
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ICs PROMPT DELIVERY!!! nn_free 


SAME DAY SHIPPING (USUALLY) mm_free(st) 


memory deallocation 


QUANTITY ONE PRICES SHOWN for OCT. 19, 1986 char *st; 
/* 
pohedhhiahati cent date sedis rae.as— Lava st is the address returned by a previous call to function mm_free. The storage 
DYNAMIC RAM ss previously allocated is made available for future use. The normal return is 
1Mbit 1000Kx1 100 ns $40 00 on _F. _E is returned if st does not point to an area previously allocated by 
4464 aka 150ns 4.10 mM | BIOS: */ 
x é { 
41256 256Kx1 100 ns 4.85 Be return free(st); /* deallocate storage */ 
41256 256Kx1 120ns 3.40 Bs } 
41256 256Kx1 150ns 2.75 Ber /* 
41128 128Kx1 150 ns 4.99 Bee - main test program 
4164 64Kx1_ 150 ns */ ! 
EPROM main() 
27512 64Kx8 250 ns ‘ 


This function serves to test the task scheduler. Two tasks are created, each 
of which increments a variable. The original task continually displays the 
counts, as well as its own iteration number. Depressing any key will cause a 
return to MS-DOS. */ 
{ 5 

int ctrl, ctr2, ctr3; /* counters */ 

int count (); /* counting subroutine */ 

int param[ 2 ]}; /* parameter array */ 

printf("tasktest (C) 1986 Ken Berry- All Rights Reserved\n"); 

printf ("Tele task scheduler: 1986 September 2 version (DDJ mod) \n\n"); 

t --initOe /* initialize task scheduler */ 

ctrl = ctr2 = ctr3 = 0; /* initialize counters */ 

param[{ 0 } = éctri; /* create first task */ 

param[{ 1) = 1; 

t_ert( count, 2, &param, 256, 0, 0, 0); 

param[{ 0 ] = &ctr2; /* create second task */ 

param[{ 1] = 2; 


27C256 32kx8 250ns 
27256 32kx8 250 ns 
27128 16Kx8 250 ns 
27C64 8Kx8 200 ns 
2764 8Kx8 250 ns 

STATIC RAM 
43256L-12 32kx8 120ns 
6264LP-15 8kxs 150 ns 


OPEN 61% DAYS, 7 av-9 pm: SHIP VIA FED-EX ON SAT. 


SUNDAYS & HOLIDAYS: SHIPMENT OR DELIVERY, VIA U.S. EXPRESS MAIL 


SAT DELIVERY | MasterCard/VISA or UPS CASH COD 

INCLUDED ON | Factory New, Prime Parts .uPoo 
receiven sy: | MICRQPROCESSORS UNLIMITED. INC. 
Th: Std Air $6/4 Ibs | Be ona Ave. “ 

Fr: P-One $13/2 ibs | BEGGS, OK. 74421 (918) 267 4961 t_crt( count, 2, &param, 256, 0, 0, 0); 


Please call for current prices because prices are subject to change. Shipping & insurance extra. while ( kbhit ( ) ) ft loop until key depres eee ef 


Cash discount prices shown. Orders received by 9 PM CST can usually be delivered to you the { 
next moming, via Federal Express Standard Air (@ $6.00, or Priority One @ $13.00! 


$335.00 


5 Mhz $125.00 


IBM PC/XT, Compaq Portable & Plus; hp Vectra 
80287-8 8Mhz 


640 Kbyte MOTHERBOARD KITS: Zenith 150, 


8087 


¥¥Ctr3; /* increment main loop count */ 
printf("main = %d, task 1 = %d, task 2 = %d\n", ctr3, Ctr Petr] (}: 
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getch(); /* discard termination character */ 
t__term(); /* terminate task scheduler */ 
return F; /* return to MS*DOS */ 


} 


count (ctr, inc) 

int *ctr,ince;: 

{ 
while( T) /* infinite loop */ 
{ 


*ctr += inc; /* update counter */ 
} 

End Listing One 
A comprehensive, indexed 
Directory of Public Domain 

C Source Code is now available. 


To order, send $10 (U.S.) to: 


Listing Two 


Listing 2- System Definitions 

(C) Copyright 1986 Ken Berry. 

All rights reserved. 

Copies may be made for non-commercial, private use only. 


The C Users’ Group 


Sys parm struc 3; register storage block 
; rax dw ? 7; ax (general register A) 
Post Office Box 97 rbx dw ? :: bx (general register B) 
McPherson, KS 67460 rex dw ? #; cx (general register C) 
r rdx dw ? 7: dx (general register D) 

(316) 241-1065 rbp dw ? *3 bp (base pointer) 

< : : rsi dw ? 3: si (source index) 
Write or call for more information on rai dw 2 z: di (destination index) 


CUG membership. 
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rsp dw ? 
rcs dw ? 
rds dw 2? 
rss dw ? 
res dw ? 
rpf dw 2? 
rsw dw 2? 
rip dw ? 
rres dw 2? 
sys parm ends 
t_task struc 
t_type db ? 
t_wttk dw ? 
t_cls dw ? 
t_pqtsk dw ? 
t_nqtsk dw ? 
t_ratsk dw ? 
t_pstsk dw ? 
t_nstsk dw? 
t fdtsk dw 2? 
t_ldtsk dw ? 
t_ps db t 
t_xtm0 dw 2? 
t_xtml dw 2? 
t_xtm2 dw ? 
t_axstk dw ? 
t_task ends 
T_ATSK equ Olh 
TX equ 80h 
TW equ 40h 
er equ 20h 
t_SW equ 10h 
t_scls struc 
t sfrq dw 2? 
t_sct dw 2? 
t fqtsk dw ? 
t_lqtsk dw ? 
t_scls ends 
t_schd struc 
t_xct dw 2? 
t_fxtsk dw ? 
t_lxtsk dw ? 
t_wet dw 2? 
t_fwtsk dw ? 
t_lwtsk dw ? 
t_swet dw ? 
t_fswtsk dw ? 
t_lswtsk dw ? 
t sclsl dw ? 
t_sclsp dw ? 
t_schd ends 
t_calln struc 
t_nbp dw 2? 
t_nret dw ? 
t_np0d dw 2 
t_npl dw ? 
t_np2 dw ? 
t_np3 dw ? 
t_np4 dw ? 
t_nps dw ? 
t np6 dw ? 
t_np7 dw ? 
t_calln- ends 
t_xtsk struc 
t_xbase dw ? 
t_xes dw ? 
t_xbp dw ? 
t_xdi dw ? 
t_xsi dw 2 
t_xdx dw ? 
t_xcx dw 2? 
t_xbx dw ? 
t_xax dw 2? 
t_xds dw ? 
t_xip dw ? 
t_xcs dw ? 
t_xpf dw 2? 
t retip dw ? 
t_xtsk ends 
retn macro 8 
ifnb <s> 
db 0C2h 
db high s 
db low s 
else 
db 0C3h 
endif 
endm 
retf macro 8 
ifnb <s> 
db 0CCh 
db high s 
db low s 
else 
db OCBh 
endif 
endm 
ilck macro reg, flag 
xchg reg,flag 
endm 
fowait macro 
nop 
endm 


33 parameter 
73 parameter 
;; parameter 


;; sp (stack pointer) 

3: cs (code segment) 

;:; ds (data segment) 

:; ss (stack segment) 

7; es (extra segment) 

:; pf (processor flags) 

;; sw (status word) 

:: ip (instruction pointer) 
?; unused 


#3; task control table 

33; task type 

:: wait tick count 

:; priority queue index 

3; prior t_task pointer 

3 next t_task pointer 

>; ancestor t task pointer 

:; prior sibling t_task pointer 

:: next sibling t_task pointer 

:; first desendant t_task pointer 
;3 last desendant t_task pointer 

ype sys parm dup (?) 


i? processor status 
* execution time accumulator 
x 


oS .» x 
:; application stack pointer 


33; abreviated task 

>; execute wueue 

3: wait queue 

:; priority queue 

;; secondary wait queue 


:; scheduling class queue 
;; scheduling frequency 
#3 queue length 

:: first task in queve 

;; last task in queue 


3: scheduling control table 

7; execution queue length 

::; first task in execution queue 

3; last task in execution queue 

:; wait queue length 

;; first task in wait queue 

;; last tagk in wait queue 

3: secondary.wait queue length 

:: first task in secondary wait queue 
z: last task in secondary wait queue 
z: scheduling class index limit 

3: scheduling class array pointer 


7: near function call 
;:; base pointer storage 
;; return address 

33 parameter 
33 parameter 
;; parameter 
33 parameter 
33 parameter 


NYRANU LS WNF OO 


3 execution stack 
;; _base (for stack overflow detection) 


;; return ip 


;; near return 
;; pop ip & adjust sp 


7: * adjustment value 
ee x 


:; pop ip only 


;; far return 


pop ip, cs & adjust sp 


7: * adjustment value 
. * 


;; pop ip, cs only 


;; Capture token 


:: I/O delay 


(continued on next page) 
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HOW 
WOULD IT 
FEEL TO 
HAVE THE 
POWER OF 
TWO VAX 
11/780s 
ON YOUR 
DESK? 


With the Consulair™ 
Professional Development 
Workstation, Now You Can! 


he programmers dream system 

takes an ordinary Macintosh™ 
and adds the Levco Prodigy 4, a 32 
bit 68020 with a 68881 floating point 
coprocessor accelerated to 16 MHz, 
4 megabytes of high speed memory, 
and SCSI interface. You get MacUser 
Magazine's Best Development Lan- 
guage of the Year, Consulair Mac C/ 
Mac C Toolkit with Direct Access ™ 
compiler support for the 68020 and 
68881. Together, the system runs 
almost % million Whetstones per sec- 
ond and the Sieve benchmark in 0.68 
seconds. As a special introductory 
offer you can upgrade your own 
Macintosh or Mac Plus.for $6495, 
including the complete software and 
hardware development system. An 
internal SCSI 20 Mbyte hard disk is 
available for an additional $995. 


If you want to move in smaller steps, 
we have a complete range of develop- 
ment systems to suit your needs. Leap 
into your future today with the Con- 
sulair Professional Development 
Workstation. 


Call our Order and Information Hotline 
Today at 415-851-3272. 


140 Campo Drive Portola Valley, CA 94025 
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SOURCE CODE LIBRARIAN & 














TLIB™ keeps ALL versions of your program in ONE ListTi Ng Two (Listing continued, text begins on page 16.) 
compact library file, even with hundreds of revisions! 
; sys entr macro flag 3: enter system function 

e Super Fast! Updates (deltas) average 5-7 times faster ifndef sys ilck 

than PC/IX (Unix) SCCS. TLIB updates libraries faster than extrn sys ilck:byte 

many editors load and save files! endif 7 
e LAN-compatible! Shared libraries with PC Network! mov al, OFFh 77 ** system task interlock 

dick al,sys ilck :; ** 

e Synchronized control of multiple reiated source files. mov flag,al ;; Save asynchronous status | 
e Use with floppies or hard disk. TLIB doesn’t need big endm 

temporary files, so you can maintain a 300K library on one 

360K diskette, with room to spare, even with TLIB itself on sys_exit macro flag 7; exit from system function 

the same disk. And libraries are more compact than with local exitl,exit2 

most other revision management systems. ifndef sys_ilck 

: extrn sys ilck:byte 

e Perfect for backup. Date and comments kept with each endif = 

version. High data integrity because library data, once ifndef t astrm : 

written, is never modified. Libraries are only appended, to extrn t astrm:byte 

minimize the chance of data loss due to a power glitch or endif = 

hardware crash. And TLIB isn't copy-protected, either. ifndef t_term 
e Free copy of Landon Dyer's excellent public domain MAKE extrn t_term:near 

utility. With macros, full source code. For DOS & VAX/VMS. endif 

test byte ptr t _astrm,OFFh ;; * test for application terminated 
PC/MS-DOS 2.x & 3.x Just $99.95 + $3 s/h Visa/MC jnz exitl 73 > 
mov byte ptr sys ilck,0O ;; exit system state 
BURTON SYSTEMS SOFTWARE j jmp short exit2 ;; continue seh rate Bean 
i exitl: test flag, OFFH ;; ** test for more stacked system tasks 
| P.O. Box 4156, Cary, NC 27511-4156 ine voice Nie Y 
(91 9) 469-3068 call t_term 33 terminate application task 
exit2: 73 Macro exit 
Circle no. 212 on reader service card. ne 
sys sync macro flag :; synchronize system resource 


ifndef t_sync 
extrn t_sync:near 


endif 
lea bx, flag :; set flag offset 
call t_sync 33 suspend task until token obtained 
endm 
sys_sstk macro 7? conditionally establish system stack 


local sstkl 
ifndef t__sstk 
extrn t__sstk:near 


dif 
PC-DOS program < or al,al 7; * test for system task interrupted 
jnz sstkl 3 2 ae ‘ pate 
11'S tk re tabl system stac 
lets your PC sstkl: mae io i . act “i a 
Read/Write/Format pop es fe 


endm 


over 275 formats 


sys sctx macro save processor context 








push bx b protect bx 
e push cx 33; protect cx 
<ENGOCHRPysPC pace sh eeeaee at 
a push si i: protect si 
by Fred Cisin push di 33 protect di 
push bp 7; protect bp a 
. push es ;; protect es | 
$79.95 + $5.00 S/H Sales Tax if CA. Se eas ‘cis 
sys_sstk 7; conditionally establish system stack 
Upgrades available from previous versions endm 
; sys rctx macro 7s restore processor context (except ds) 
To Order Contact: : si ee See eebore oa 
AS [TN It , pop bp 3; restore bp 
<ENG@Swosr pop 1} restore i 
pop si ;; restore si 
- pop dx 73 restore dx 
1454 Sixth Street, Berkeley, CA 94710 2 Leva ata ie ae 
pop bx 3; restore bx 
(415) 525-3113 poi 73 restore ax 
en 
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sys _rctx macro 7; restore processor context 
sys rcetx #3 restore context (except ds) 
... Software Developers .. . eer as ieee oe Ae . 


Develop your software to work with most of the endm 


desktop printers on the market? 







sys ient macro flag 










Now, CARDINAL POINT INCORPORATED has published push ds 33 protect ds 

Volume || of the PROGRAMMERS’ HANDBOOK OF COM- push ax #7 protect ax 

PUTER PRINTER COMMANDS II, for models as new as 1985. a _ i pe: arose! establish data addressability 
Volume II compliments (but does not replace) book one sys mee: tise 37 énter ‘system state 

and adds more detailed ESCAPE and Control Codes se- ce :: interrupts on 

quences for more printers by the leading printer manufac- sys sctx ;; Save processor context 

turers. Each book is 5%” x 82”, spiral bond, and contains endm 






an easy to use table-format. Codes are listed in text form 
with hex and decimal equivalents and detailed function 






sys iret macro flag 














description. local iretl 
These two volumes should be a part of your reference library. ifndef t_astrm 
1. Volume | (models through 1984) ....... $37.95 et een Ete 
S876 86 626 wre fete e . endif 
2. Volume Il (models as new as 1985) Bley Celie O90, 6, ah w tae Kies s8 te $26.95 cli se interrupts off 
Ree We Ok SU ee ene $58.95 test byte ptr t_astrm,OFFh :; * test for application not terminated 
(Indiana residents add 5% sales tax. jz iretl ze 
Please include $2.50 shpg/hdlg) test flag,OFFh ;; ** test for system state interrupted 
TO ORDER CALL: jnz iretl ser eee 
(812 ) 876 - 7811 sti ::; interrupts on 
Quantity Orders or Dealers can call this number Collect. retn #2 return to task management 
For more detailed information, call or write: iretl: sys rctx 7; restore processor context 
iret 7; resume interrupted task 
: . endm 
x-artinal, Point 
dseg macro 
INCORPQR ATED dgroup group data 
data segment word public ‘data’ 






P.O. Box 596, Ellettsville, IN 47429 Beeeera 

eS (812) 876-7811 (M-F, 9-5 EST) VISA 
© We accept MC, VISA, MO-same day shop. = 
COD — $2 extra. CK's — Allow extra 14 days. 
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assume ds:dgroup,es:dgroup, s8:dgroup 


endm 

endds macro 

‘data ends 
endm 

pseg macro 

pgroup group prog 

prog segment byte public 'prog' 
assume cs:pgroup 
endm 

endps macro 

prog ends 
endm 


End Listing Two 


Listing Three 


Listing 3 Scheduling Algorithm (Assembly Subroutines) 
(C) Copyright 1986 Ken Berry. 

All rights reserved. 

Copies may be made for non-commercial, private use only. 


include tele.mac ; system definitions (listing 2) 
extrn t_astrm:byte ; application task termination flag 
extrn t_rtmark:near ; update pseudo time accumulator 
extrn t__krnil:near ; security kernel 


public sys task ; current task pointer 

public sys tsch ; task scheduling table pointer 
public sys ilck ; system task interlock 

public sys _asbs ; application stack base 
public sys dgrp ; data segment storage 

public sys _ssbs ; system stack base 

public sys sssz ; system stack size 

public sys _sstp ; system stack top 

public sys stat ; original register block 
public t_mnxtm ; minimum execution time 

public t_rels ; release 

public t_spnd ; suspend 

public t_syxtm ; system pseudo time accumulator 
public t_ term ; reschedule 

public t wait ; wait 


public t wqupd ; wait queue update task pointer 
public t _crtss ; current task ss storage 
public t crtsp ; current task sp storage 
public t_dspap ; dispatch application 

public t dspsy : dispatch system 

public t sstk ; establish system stack 

public t__syntr ; enter system state 

public t__syxit ; exit system state 


MINXTM equ 500 ; minimum execution time 
STKLN equ 1024 ; system stack size 
dseg 
tmrdx dw 0 ; dx storage 
spdss dw 0 ; ss storage 
spdsp dw 0 ; sp storage 
t__crtss dw 0 ; current task ss storage 
t_crtsp dw 0 ; current task sp storage 
sys stat db type sys parm dup (0) ; original register block 
sys dgrp dw 0 ; data segment storage 
sys task dw 0 ; current task pointer 
sys tsch dw 0 ; task scheduling table pointer 
sys asbs dw 0 ; application stack base 


sys_ssbs dw stkbs 
sys sssz dw STKLN 
sys_sstp dw STKLN 
sys ilck db OFFh 


t_wqupd dw 0 
t_syxtm dw 3 dup (0) 


:; system stack base 

; system stack length 

; system stack top 

: system task interlock 


: wait queue update task pointer 
; system pseudo time accumulator 


t_mnxtm dw MINXTM ; minimum execution time 


stkbs db STKLN dup (0) ; system stack 
db type t_task dup (0) ; main task control table 
endds 
pseg 


comment ~ 


t__dspap (ss, sp) 
selector ss; 
unsigned sp; 


ss and sp are placed in the stack registers. Then the other registers are 
restored from the new stack. Control passes to the restored task. The return 
address is left at the top of the system stack. Therefore the restored task 


may use the system stack to return to the caller of t__dspap. ax may contain a 
return code in this case. 


t dspap proc near 

co push bp 
mov bp,sp 
mov ax, (bp].t_np0 ; 
mov bx, [bp] .t_npl 


; protect bp 
: establish parameter addressability 
set application stack 


(continued on next page) 
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‘s/ Complete 
C Programs 

in Half the Time, 
with Instant-C™ 


ou can create programs much faster 

with Instant-C than with convention- 
al programming tools. How? Because 
Instant-C is a high-performance inter- 
preter, there are no compile or link 
delays. Change your program, then 
test it immediately. No matter how 
large your program, the turnaround 
time is just seconds. 


































































“Instant-C means instant gratification." —PC 
Magazine, Editor’s Choice for best 
C interpreter. 





Powerful source-level debugging 
saves your time. Conditional break- 
points, single-stepping by statement, 
source code backtraces, data moni- 
toring, and many other debugging 
features make it easy to wipe out bugs 
quickly. Direct execution of any state- 
ment or function makes testing a 
breeze. 





“The resulting debugging and testing capa- 
bilities are fantastic and the detailed trace/de- 
bug/display commands make it easy.’ — The 

C Journal 





Instant-C checks pointer references 
for reasonableness, and checks that 
array indexes are within declared 
bounds. This run-time checking 
stops your program as soon as errors 
occur, for easiest debugging. 

Not only does Instant-C help you 
quickly change, test, check and debug 
your code, but it runs your program 
fast enough for real-time appli- 
cations. 





“It is much faster than any of the other pro- 
ducts mentioned and was the only one able to 
complete the standard SIEVE in a reasonable 
time. Clearly, this high speed allows much 
more complex problems to be attacked with 
Instant-C than with any of the other products 
discussed.” —Computer Language 





Immediate feedback and precise 
diagnostics make Instant-C great for 
learning C. Full K&R and the ability to 
link compiled object code and li- 
braries (Lattice and Microsoft) makes 
Instant-C compatible with your existing 
programs. 

Instant-C makes all parts of the 
programming task as fast as possible. 





“Clearly, Instant-C is the performance 
champion.”—PC Tech Journal 


Version 2 works with MS-DOS and 
PC-DOS, and has a full 31 day money 
back guarantee. Instant-C is only 
$495. Order today! Call or write for 
full information. 

PO. Box 480 


Rational x xicj va 01760 
Systems, Inc. (617) 653-6194 
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#1 C interpreter 








The professional 
C development 
environment 


Your C compiler creates great final code. . . 
but as a programming tool, it's too,too slow. 
With C-terp you can edit, debug, and run 
without the wait. Nothing, but nothing, is faster 
for developing professional C programs. 


Choose the perfect C-terp companion 
for your C compiler 


C-terp/Microsoft C-terp/XENIX 
C-terp/Lattice C-terp/Aztec 
C-terp/Mark Williams C-terp/C86 


Link in all your compiler’s functions, your own 
functions, add-on libraries, assembly routines, 
and data objects. Get instant access to every- 
thing in the C-terp interactive environment. 


Only C-terp offers all this and more 

# Full K&R with common ANSI 
enhancements 

= Source level interactive debugging 

= Software paging for your big jobs 

# Complete multi-module support 

# Run-time pointer checking 

= Unsurpassed reconfigurable screen 

editor 

Dual display and full graphics support 

= Large model @ Call-in 


ORDER C-terp TODAY (specify compiler) 


C-terp runs on IBM PC, AT or é 
compatibles. ne 


Price: 
MS-DOS 2.x and up - $298, 
Xenix System V 286 - $498 
MC, VISA, COD 
30-day money-back 
GUARANTEE 


Trademarks: C-terp (Gimpel Software), 

C86 (Computer Innovations), Lattice (Lattice, Inc.), 
Xenix, Microsoft, MS- DOS (Microsoft, Inc.), Aztec (Manx 
Software), Mark Williams (Mark Williams Company) 
IBM (International Business Machines, Inc.) 


CIMPEL SOFTWARE 


3207 Hogarth Lane, Collegeville, PA 19426 
(215) 584-4261 
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MULTITASKING KERNEL 


Listing Th ree (Listing continued, text begins on page 16.) 


mov sys sstp,sp ; store current top of system stack 
eli 

MOV 88,ax 

mov sp,bx 


mov bp, sp ; enable interrupts 
or {bp} .t_xpf,0200h 

pop sys_asbs 

sti 

sys rctx * restore context 
cate ; interrupts off 


mov byte ptr sys ilck,0 ; exit system state 
mov byte ptr t_astrm,0 ; initialize application interval 
pop ds ; restore ds 
iret ; execute task 
t__dspap endp 


comment ~ 
t_term() or 
t_spnd (tp) tp 
t_wait (tp) tp 
unsigned tp; 
t_rels() m - 


All of these functions are similar. The processor registers are stored on 

the stack, which is then adjusted to match the pattern for interrupt 
returns. Finally the system stack is established. The functions differ in 
the code returned to the caller of function t_ dspap. t__dspap restores 
the registers and returns control to the caller of these functions. The 
returned value is shown with the appropriate call above. tp is only used 
with t_spnd and t_wait. It is the number of system ticks to wait before 
executing the task again. t_wait functions like t_spnd, except that t_rels 
is invoked immediately. ~ 


t_term proc near 
call t_trmap ; protect registers 
xOYr ax,ax ; return F 
ret 


t_term endp 


t_spnd proc near 
mov spdss,ss ; store stack pointers 
mov spdsp, sp 
call t_trmap ; protect registers 
mov es, spdss ; return tick count 
mov si, spdsp 
mov ax,word ptr es:[si+2] 


push ds ; set es = dg 
pop es 
ret ; return 


t_spnd endp 


t_wait proc near 
push bp ; protect bp 
mov bp, sp ; establish stack addressability 
mov ax, [bp].t_np0 ; suspend task 
push ax 
call t_spnd 
mov sp, bp ; unload stack 
pop bp * restore bp 
t_rels proc near 
call t_trmap ; protect registers 
XOr ax, ax ; return E 
dec ax 
ret 


t_rels endp 
t_wait endp 


comment ~ 
t___dspsy () 


A call to function t_trmap is made so that after the registers are stored in 
the application stack (and the system stack is made current), control passes 
to function t_krnl, the system security kernel. Control will return from 
t__dspsy when the calling task is resumed. Nothing is returned. 


t dspsy proc near 
mov ax,offset pgroup:t_krnl ; branch to system 
push ax 
sub sys_sstp,2 ; adjust system stack (for "pop bp" in t__sstk) 


comment ~ 
t__ trmap() 
The machine registers are stored on the application stack. Then the system 


stack is made current. The return address from the call to t__trmap is put on 
the system stack before returning to it. Nothing is returned. 


t__trmap proc near 
mov byte ptr sys ilck,OFFh ; force system state 


mov tmrdx, dx ; save dx 

pop dx ; set return address (from t_ trmap) 
push cs 3 protect cs ea 
pushf + protect flags 

push ds ; protect ds 

push ax ; protect ax 

push bx : protect bx 

push cx s protect cx 

push tmrdx ? protect dx 

push si ; protect si 

push di ; protect di 

push bp ; protect bp 


(continued on page 64) 
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“Before I chose Microsoft C, 
sect ee ORutae 
OMRON UTTAR TUR 


the same in 2 hours.’ 


Bill Davidsen 
Software Engineer 
Real Time and Operating Systems 





“Call us. You can get Microsoft C or 
our comprehensive report on C by 
the day after tomorrow.” 


Bruce Lynch, President 
The Programmer's Shop 


The security of thorough research. It took Bill Davidsen 
six months to thoroughly evaluate all C products before 

he selected Microsoft C. For him, its tight code and UNIX 
System V™ compatibility were exactly what he needed. 
And now Version 4.00 includes CodeView, a source-level 
windowing debugger. 

Thanks to expert users like Bill, and The Programmer's 
Shop, you can enjoy that satisfied feeling of thorough 
product evaluation in just a few hours. 

We recommend evaluating software by also getting 
detailed information from several different sources, includ- 
ing unbiased reports and reviews. Bill agrees completely. 

n fact, he helped us compile the objective opinions of 
4 magazines, 14 users and 3 industry analysts in a 16-page 
report on C: The C Test. It can help you be absolutely sure 
of making the choice that’s best for you. And it's abso- 
lutely free. 


C for yourself. As an objective evaluation by users and 

oe alike, The C Test is one of the most compre- 
ensive and informative reports currently available on 

C development tools. It’s only available from 

The Programmer's Shop. And it’s yours free 

for the asking. Here’s what you'll find in it: 


The C Test # Detailed Tech Specs 
= Benchmark Source Code ® Magazine 
Reviews ® Users’ Feedback ® Perfor- 
mance Benchmarks ® User Study and 
Profiles * Test Drive Survey Results 
= 37 Compatible Products 

And if you're looking for even more C support, Micro- 
soft-compatible libraries for file management, graphics, 
screen control, object-oriented programming and other 
tools are ready to ship. 


The best programs for less. We think the only way 
to serve you is to give you the best programming alter- 
natives. The best recommendations for your needs. 

To deliver immediately. And this is how we do it. 


THE PROGRAMMER’S SHOP 







We start by giving you a choice of over 62 programming 
language implementations and 174 support programs. 
All from the same source. All competitively priced. 

Our informed programmers offer free advice whenever 
you call with any questions about any product. 

And when you place an order, we can rush it to you in 
48 hours or less. That's the kind of service and support our 
10,000 customers have come to expect. 

Because we’ve become a success by giving the best 
advice for free and selling the best software for less. 

To order Microsoft C ($279) or for your free copy of 
The C Test, simply call the toll-free number below: 


1-800-421-8006. In Massachusetts, call 1-800-442-8070. 


MICRSSOFT. C Compiler Version 4.00 
MICROSOFT C COMPILER 


= Produces fast executables and optimized code including elimination 
of common sub-expressions. NEW! 

= |mplements register variables. 

= Small, Medium and Large Memory model libraries. 

= Compact and HUGE memory model libraries. NEW! 

= Can mix models with NEAR, FAR and the new HUGE pointers. 

= Library routines implement most of UNIX System V C library. 

= Start-up source code to help create ROMable code. NEW! 

= Full proposed ANSI C library support (except clock). NEW! 

= Link your C routines with Microsoft FORTRAN (version 3.3 or 
higher), Microsoft Pascal (version 3.3 or higher) or Microsoft 
Macro Assembler. 

= Microsoft Windows support and MS-DOS 3.1 networking support. 


MICROSOFT PROGRAM MAINTENANCE UTILITY. NEW! 
= Rebuilds your applications after your source files have changed. 
= Supports macro definitions and inference rules. 


OTHER UTILITIES. 
# Library Manager. 
= Overlay Linker. 


MICROSOFT CodeView 

WINDOW-ORIENTED SOURCE-LEVEL DEBUGGER. NEW! 

= Watch the values of your local and global variables and expressions 
as you debug. 

= Set conditional breakpoints on variables, expressions or memory; 
trace and single step. 

= Watch CPU registers and flags as you execute. 

= Debug using your original source code, the resulting disassembly 
or both intermingled. 


Microsoft C comes with a 30-day money-back guarantee from 
The Programmer’s Shop. 
























= EXE File Compression Utility. 
= EXE File Header Utility. 









































UNIX System V is a trademark of AT&T Bell Laboratories. 
Microsoft is a registered trademark and CodeView is a trademark of Microsoft Corporation. 





The programmer's complete source for software, services and answers. 


128 Rockland Street, Hanover, MA 02339 


(617) 826-7531 


Circle no. 174 on reader service card. 


DATA CONVERSION 


Cee 
on 


TRANSFER DATA BETWEEN OVER 
600 DIFFERENT COMPUTER SYSTEMS 


WORD PROCESSORS TOO 





QUICK TURN-AROUND 
PRICES FROM $9 PER DISK 
CALL OR WRITE FOR YOUR 


FREE CATALOG 


PORT-A-SOFT 
955 S. STATE ST., SUITE #12 
P.O. BOX 1685, OREM, UT 84057 





Circle no. 229 on reader service card. 
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MULTITASKING KERNEL 


Li sting Three (Listing continued, text begins on page 16.) 


push es ; protect es 
push dx ; restore return address to stack 
mov bp,sp ; establish stack addressability 


mov ax,[bp].t_xip ; adjust stack for interrupt return 
xchg ax, [bp] .t_xpf 
mov [bp] .t_xip, ax 


comment ~ 
t__sstk() 


The current application stack pointers are stored. Then the system stack is 
established as the current stack. The return address from the call is placed 
on the system stack before returning into it. Nothing is returned. 


t sstk proc near 
eax pop dx ; unload return address 
push sys asbs ; protect stack protection reference 
mov bx,ss ? set application stack registers 
MOV CX,Sp 
mov ax,sys ssbs ; set system stack 
cli 
mov sys asbs,ax 
push ds 
pop ss 
mov sp, sys sstp 
sti 
pop bp ; restore bp 
mov t__crtss,bx ; store current ss 
mov t_ crtsp,cx : store current bp 
push dx ; return to caller 
ret 
t__sstk endp 
t__trmap endp 
t__dspsy endp 


comment ~ 


t_sync(flg) 
char *flg; 


A wait loop will be entered until the required resource i; available. This is 
indicated by flg containing 0x00. OxFF is stored to prevent any other tasks 
from acquiring the resource. The resource is released by resetting flg to 
0x00. 


~ 


t_sync proc near 
push bp * protect bp 
mov bp,sp +; establish stack addressability 
mov bx, [bp].t_npod ; set pointer to resource flag 
syncl: mov al, OFFh ; interlock token 
dick al,<byte ptr [bx]> 
or al,al ; test for token acquired 
jz sync2 
xOr ax,ax ; wait for 1 system tick 
inc ax 
push ax 
call t_spnd 
mov sp,bp 
jmp syncl ; continue 
sync2: pop bp ? restore bp 
call t_rels * release task 
ret * return 


t sync endp 
comment ~ 


t__ syntr(flg) 
char *flg; 


This function expands the Sys_entr macro for use by c functions. 


t__syntr proc near 
push bp * protect bp 
mov bp,sp ; establish stack addressability 
mov bx, [bp}.t_npO ; set flag address 
sys _entr <byte ptr [bx]> ; enter system state 
pop bp * restore bp 
ret : return 

t__syntr endp 


comment ~ 


t__syxit (flg) 
char *flg; 


This function expands the sys_exit macro for use by c functions. 


~ 


t__syxit proc near 
push bp * protect bp 
mov bp,sp ; establish stack addressability 
mov bx, [bp] .t_np0 - set flag address 
sys_exit <byte ptr [bx]> ; exit system state 
pop bp * restore bp 
ret ; return 

t__syxit endp 


endps 


End Listing Three 
(Listing Four begins on page 66 ) 


end 
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A MEGABYTE FOR DOS! 


MicroWay is the world’s leading retait 
er of 8087s and high performance PC 
upgrades. We stock a complete selec- 
tion of 8087s that run from 5 to 12 
MHz All of our coprocessors are 
shipped with a diagnostic disk and the 
best warranty in the business — one 
year! We also offer daughterboards for 
socketless computers (NEC PC) and 
287Turbo which increases the clock 
speed of the 80287 from 4 to 10 MHz 
Our NUMBER SMASHER/ECM"” runs 
at 12 MHz with a megabyte of RAM 
and achieves a throughput of.1 mega- 
flops with 87 BASIC/INLINE, Intel For- 


SPEED UP YOUR AT 
OR AT COMPATIBLE 
WITH 287TURBO” 10 MHz 





A2D-160™ MicroWay’s Data Acquisition Board 
performs 160,000 12 bit Analog to Digital conver- 
sions per second! Includes software drivers. The 
fastest 12 bit A to D board available. For the IBM 
PC XT and compatibles. ................. $1295 


87SFL” Accurate and fast Scientific Sub- 
routine Packages. More than 145 functions: 34 
Elementary Fens, 18 Probability and Statistical 
Fens, 15 Random Number Generators, Ei(x), E.(x), 
li(x), Si(x), Ci(x), T(x), YX), B(x,~), L(a,b), erf x, S(x), 
C(x), J,(z), Y¥.(x), L(Z) ,K.0x), Ai(x), Bi(x), Ai’(x), Bi'(x), 
ber x, bei x, ker, x, kei’ x, K(x), E(x), F(ela), E(ela), 
Ti(p|a,b), A(a,b,e), (Zz), %(Z), P(x), H,(x), 
L‘@) (x), Jie (x), G,(p,q,x), CS) (x) and many more. 
Callable from FORTRAN, Pascal, BASIC and C. ist 
module $250, 2nd on $100. 


MATRIXPAK™ manages a MEGABYTE! 
Written in assembly language, our runtime pack 
age accurately manipulates large matrices at very 
fast speeds. Includes matrix inversion and the 
solution of simultaneous linear equations. Call 
able from RM or MS Fortran, MS Assembler, or 
BF I LAIN Geena cco ee cetees acne each $99 


87FFT™ Written in assembly language, per- 
forms Forward and Inverse FFTs on real and conr 
plex arrays which occupy up to 512 Kbytes of 
RAM. Also does convolutions, auto correlations, 
hamming, complex vector multiplication, and com- 
plex to radial conversions. Callable from most 
8087 compatible compilers.............-. $200 
87FFT-2”™ performs two-dimensional FFTs. 
ideal for image processing Requires 87FFT $100 
FASTBREAK™ 8087 support for Lotus 


SOalg” VOIAUS LA COl APA «os fbx carina dinamo’ $79 
Microsoft Fortran V 3.31 ...............05- $209 
IBM Professional Fortran ...............5: $565 
Ryan-McFarland Fortran V2.0...........- $399 
LAHEY Fortran P71 Lise cccsdcc ces vive eset $477 
Grafmatic for Fortran or Pascal............ $125 
MultiHalo Graphics (1 language).......... $189 
Rrra Cs WE ns ck sacked foe eR wens $299 
is AR WL oP ice in ices dams cha Oarn $450 
INTEL, JRAM, AST, MAYNARD ........... CALL 


P.O. Box: 79 
Kingston, Mass. 
02364 USA 
(617) 746-7341 
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tran, or Microsoft Fortran. Software re- 
viewers consistently cite MicroWay 
software and 8087 expertise as the 
best in the industry! Our customers fre- 
quently write to thank us for reconr 
mending the correct software and 
hardware to meet their specific needs. 
They also thank us for our same-day 
shipping! In addition to our own prod 
ucts which support the 8087 and 
80287, we stock the largest supply of 
specialized software available. For 
more information call us at 


617-746-7341 






Mega Page™ The only Intel-Lotus EMS board 
which comes with two megabytes of cooFrunning, 
low power drain CMOS RAM installed Includes 
RAM disk, print spooler, disk cache, and EMS driv 
ers. For the IBM PC, XT & compatibles. ... $549 


DFixer™ Our disk utility which thoroughly 
checks PC or AT hard disks for bad sectors and 
updates the MS DOS file allocation table accord 
ingly. Solves the AT hard disk problem! ... $149 


DOptimizer™ Optimizes the way your hard 
disk or floppy stores its files Speeds up accesses 
by recombining fragmented files ........... $49 


DCache™ Our disk caching software speeds 
up your I/O by storing repetitively used tracks in 
memory. The amount of memory used can be 
selected in 64 Kbyte banks ................ $49 


87MACRO/DEBUG"™ Contains all the 
pieces needed for writing 8087/80287 assembly 


code & MicroWays 87DEBUG debugger.$199 


OBJ —ASM\™ Amultipass object module trans- 
lator and disassembler. Produces assembly lar- 
guage listings which include public symbols, ex- 
ternal symbols and labels commented with cross 
references. Ideal for patching object modules for 
which source is not available. ............. $200 


87 BASIC” includes patches to the IBM BASIC 
or MS Quick BASIC Compiler for USER TRANS- 
PARENT 8087 support Provides super fast per- 
formance for all numeric operations including trig- 
onometrics, transcendentals, addition, subtrac- 
tion, multiplication, and division...... each $150 


87 BASIC/INLINE” converts the output of 
the IBM BASIC Compiler into optimized 8087 
inline code which executes up to seven times fast- 
er than 87 BASIC. Supports separately compiled 
inline subroutines. Requires the IBM BASIC Contr 
piler Version 1 and a Macro Assembler. Includes 

BASIC $200 


RTOS - REAL TIME OPERATING SYSTEM 

RTOS is a multiuser, multi-tasking real time oper- 
ating system. It includes a configured version of 
Intel's IRMX-86, LINK-86, LOC-86, LIB-86, OH-86, 
and MicroWay's 87 DEBUG. Runs on the IBM-PC, 


XT, PC-AT and COMPAQ. ...........--5555 $600 
INTEL COMPILERS' 

nn et a ag. ews curtain $750 
Ee ir a gal bated tte poe eR $750 
PETAR 5c de iat Sideu vs no tons abe eres 
I is tn ee Geechee aie oe 200 


‘Requires RTOS or iRMX-86. All Intel compiler names and 
iRMX-86 TM Intel Corp. 


Circle no. 300 on reader service card. 


a? 
8087 Support 


For the IBM PC, PC XT, PC AT and Compatibles. 


NUMBER SMASHER/ECM" 
THE FASTEST ACCELERATOR 
CARD AVAILABLE 
gives you 12 MHz speed in two modes: 
704K or one megabyte of “Extended 
Conventional Memory.” MEGASWITCH 
MMU and MegaDOS software make it 
possible to run DOS applications with 
up to 1015K using PC compilers, Auto 
CAD and Lotus 1-2-3. Does not re 
quire EMS software. Totally compat- 
ible... from $599 for 512K and 9.54 
MHz to$1199 with one megabyte and 

8087-12. 
Cooling Fan (for 12 MHz)........ $80 





8087 UPGRADES 


All MicroWay 8087s include a one year warranty, 
complete MicroWay Test Program and accurate 
installation instructions. 


8087 5 MHz................$114 
For the IBM PC, XT and compatibles. 
8087-2 8 MHz............ $149 


For Wang, AT&T, DeskPro, NEC, Leading Edge. 


80287-3 5 MHz......... $179 


For the IBM PC AT and 286 compatibles. 


80287-6 6 MHz......... $229 


For 8 MHz AT compatibles. 


80287-8 8 MHz......... $295 


For the 8 MHz 80286 accelerator cards. 


NEC V20, V30..............-. $16, $30 
64K RAM Set 150ns................ $10 
256K RAM Set 150ns.............. $29 
256K RAM Set 120ns.............. $39 
128K RAM Set PC AT.............. $49 


287Turbo” 10 MHz if you own an AT, 
Deskpro 286 or AT compatible, this is the card you 
need to get reasonable numeric performance. It 
ae into your 80287 socket and includes a spe- 
cially driven 10 MHz 80287. The card comes in 
three configurations. The IBM AT version includes 
a hardware RESET button................ $450 


287Turbo 8 MHz................... $369 


87/88Turbo” is astubby card which includes 
a clock calendar and a speed controller which 
changes the speed of your motherboard from 4.77 
to 7.4 MHz Its use requires your PC to have a 
socketed 8284. Typical speed increase is 1.6 to 
2.0. The card overcomes slow hardware by slow- 
ing up only when such devices are accessed and 
running at full speed otherwise ........... $149 
Qe = oon cies bin ide eo ales ae $149 


286 TurboCache’” This accelerator for the 
PC or XT uses 8K of cache memory and 80286/ 
80287 processors to provide an average speed 
increase of 3:1 for most programs. Call for spect 
fications and benchmarks. .............++- $469 


Call for our complete catalog of 
software which supports the 8087. 


In London, please phone 223-7662 
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Listing Four (Listing continued, text begins on page 16.) 





Listing 4 High Resolution Clock 

(C) Copyright 1986 Ken Berry. 

All rights reserved. 

Copies may be made for non-commercial, private use only. 


include tele.mac ; system defintions (listing 2) 


extrn t_syxtm:word ; system execution time accumulator 
extrn sys dgrp:word ; data segment storage 
extrn sys stat:word ; original register block 


public t_tick ; system tick interrupt service 
public t astrm ; application task termination flag 
public tmr_dspl ; physical display pointer 

public tmr dvsr ; timer period 

public tmr ilck ; tick service reentrant interlock 
public tmr_sync ; synchronization function address 
public tmr tkct ; tick clock 

public tmr xtm ; tick service execution time 
public tmr_clr ; reset time base generation 
public tmr int ; timer initialization function 
public tmr_ rst ; timer termination function 
public tmr sts ; read timer status 

public tmr__tmr ; restart hardware timer 

public t_rdclk ; read high resolution clock 

public t_rtactg ; psuedo time accumulator pointer 
public t_rtmark ; mark execution interval 

public t__rdclk ; read real time clock 

public td_ref ; clock update tick reference count 
public td_tct ; clock tick timer 

public td set ; set time of day clock 

public td__upd ; update time of day clock 

public w_cdspl ; physical display update function 
public w sync ; physical display synchronization 


RLCINT equ 80h 
TMRINT equ 8 


relocated alternate time base interrupt 
hardware timer interrupt 

TMRPRT equ 40h timer (8253) port 

TMRPRD equ 19912 timer period (60 Hz rate) 

; TMRPRD equ 9956 ; timer period (120 Hz rate) 

INTPRT equ 20h interrupt controller (8259) port 

TMRMSK equ Olh hardware timer interrupt mask 

INTEOI equ 20h interrupt termination value 

DSPCT equ l 60 Hz interrupt rate 

;DSPCT equ 2 ; 120 Hz interrupt rate 


=e te 


+e te Me Fe 


IDVO eggs): ; tmr_idvO divisor 

ISKPO equ 776 ; tmr_ict correction value 

ISKP1 egu ll ; tmr_idvl correction value 

ISKP2 equ 38 ; tmr_idv2 correction value 
dseg 


tmr_tkct dw 0 
tmr_dct db 0 

tmr_ ict dw 0 
tmr_dvsr dw TMRPRD 
t_astrm db OFFh 
tmrflg db OFFh 


interrupt counter 

display counter 

tick clock (for time base generation) 
1/2 timer period 

application task termination flag 
system state flag (t tick) 


Ve Se te Ye Te Se Ye “SF Be Be Ve 


tmr_ilck db 0 tick service reentrant interlock 
tmr_idvO db 0 clock time base generator 
tmr_idvl db 0 primary alternate time base generator 
tmr_idv2 db 0 secondary alternate time base generator 
tmr_dspl dw 0 console display w_pwdw pointer 
t_rtactg dw 0 ; psuedo time accumulator pointer 
t_rtrfct dw 0 ; real time reference count 
t_rttick dw 0 ; tick clock phase 
tmr_xtm dw 3 dup (0) :; tick service psuedo time accumulator 
tmrpxtm dw 0 ; prior psuedo time accumulator pointer 
tmr_sync dw offset pgroup:w__sync ; synchronization function pointer 
td_ref dw 0 ; clock update tick reference count 
td tect dw 0 ; clock tick timer 

endds 

pseg 
comment ~ 
tick system tick service 
Co SITCKN\ 


Control only comes here in response to an interrupt from the system clock. 
This function serves three purposes. It maintains the system clock, which 
provides the current date and time for both system and application uses. It 
also performs an update of the first physical display. And finally it 
terminates the execution interval for the current application task. 


t_tieck= proc far 
; reentrant lockout 


assume ss:nothing,ds:nothing,es:nothing 


sti ; interrupts on 
push ds * protect ds 
push ax * protect ax 


mov ax,dgroup ; establish data addressability 
mov ds,ax 

assume ds:dgroup 

mov al, INTEOI ; terminate interrupt 

out INTPRT,al 

ilck al,tmr_ilck ; test for not reentrant call 
or al,al 

jz tick 

pop ax ; restore ax 


(continued on page 74) 
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Blaise Computing provides a broad range of pro- 
gramming tools for Pascal and C programmers, 
with libraries designed for serious software 
development. You get carefully crafted code 
that can be easily modified to grow with your 
changing needs. Our packages are shipped com- 
plete with comprehensive manuals, sample pro- 
grams and source code. 





$175.00 


NEW! Full spectrum of general-purpose utility ‘ 
functions; windows that can be stacked, re- 
moved, and accept user input; interrupt serv- 
ice routines for resident applications; screen 
handling including EGA 43-line text mode sup- 
port and direct screen access; string functions; 


and DOS file handling. 





Expanded string and screen handling; graphics 
routines; easy creation of program interfaces; 
memory management; general program con- 
trol; and DOS file support. 





Complete screen management; paint data entry 
screens; screens can be managed by your appli- 
cation program; block mode data entry or field- 
by-field control. Specify C or IBM/MS-Pascal. 








$175.00 


$175.00 
Full featured asynchronous communications | 
library providing interrupt driven support for 
the COM ports; I/O buffers up to 64K; XON/ 
XOFF protocol; baud rates up to 9600; modem 
control and XMODEM file transfer. Specify C or | 






. FOOLS 
$99.95 

NEW! Expanded string support; extended 
screen and window management including EGA 
support; pop-up menus; memory management; 
execute any program from within Turbo Pascal; 
interrupt service routine support allowing you 
to write memory resident programs; schedul- 
able intervention code. 








$99.95 


Complete asynchronous communications 
library providing interrupt driven support for 
the COM ports; I/O buffers up to 64K; XON/ 
XOFF protocol; and baud rates up to 9600. 





$49.95 


NEW! Text formatter written especially for pro- 
grammers; flexible printer control; user-defined 
variables; index generation; and general macro 
facility. Crafted in Turbo Pascal. 





$95.00 


Program chaining executive. Chain one pro- 
gram from another even if the programs are in 
different languages. Shared data areas can be 
specified. 


ORDER TOLL-FREE 800-227-8087! 





ae 
soca sess ae ae es 
BLAISE COMPUTING INC. 


2560 Ninth Street, Suite 316 Berkeley, CA 94710 (415) 540-5441 


Circle no. 217 on reader service card. 
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NEW! FROM 
BLAISE 
COMPUTING 


Today’s programmers 
need more than yes- 
terday’s tools. Re- 
quirements such as 
removable windows 
and ‘“‘sidekickable”’ 
pop-up utilities 
are changing 
the face of pro- 
gram design. 
You need to fil- 
ter interrupts so 
that other resi- 
dent programs 
still work. You 
need the ability to switch between 
multiple display pages and monitors. 
Today’s technical demands are almost 
endless, but C TOOLS PLUS gives you 
what you need. 











SOLID LIBRARY SUPPORT 


Blaise Computing offers you solid li- 
brary support that can meet all your 
demands and more. C TOOLS PLUS 
embodies the full spectrum of general- 
purpose utility functions that are criti- 
cal to today’s applications. 


Here’s just part of the PLUS 
in C TOOLS PLUS: 





@ C TOOLS and C TOOLS 2 compatibil- 


ity —two packages that receive rave 
reviews for quality, organization, usa- 
bility and documentation. 


@ FULL SOURCE CODE 


C Tools Plus 


For The Programmer 


Whose Alphabet 


Begins & Ends 
With “C” 


@ WINDOWS that are stackable, re- 
movable, that support word wrap and 
that can accept user input. 


@ INTERRUPT SERVICE ROUTINE 
support for truly flexible, robust and 
polite resident applications. 

@ MULTIPLE monitor and display 
support, including EGA 43-line mode. 

@ FAST DIRECT VIDEO ACCESS for 
efficiency that will not constrain good 
program design. 

@ DOCUMENTATION, TECHNICAL 


Also Available Are: 

C VIEW MANAGER — 
A kit for building data 
entry screens and menus. 
Begin by designing on- 
screen what the operator 
will see; call upon our 
library functions from 
your program to display 
the screens and retrieve 
the data. Just $275, in- 
cluding all library 
source code. 

C ASYNCH MAN- 
AGER — provides 
the crucial core 
of hardware in- 
terrupt support 
needed to build 
applications that 
communicate. It 
also includes the “XMODEM” file-transfer 
protocol and support for Hayes-compatible 
modems. All source code is included for $175. 
C TOOLS & C TOOLS 2—an indispensable 
combination still available at a low price of 
$175, including all source code. See re- 
view in PC Tech harm. Journal, 6/85. 


see SIM) Cc ce es ates 
BLAISE COMPUTING INC. 


2560 Ninth Street, Suite 316 Berkeley, CA 94710 (415) 540-5441 


ORDER TOLL-FREE 800-227-8087! 
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ES, S A resi hipping: 
guished Blaise Computing 1 STOOLS ye rederal Express® oo aoe 
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Put your chips 











The best bet. ae 
If you're betting your % 
future on a 32-bit micro- — 
processor-based system, 
you'd rather bet a winner. 
Today, the clear winner is 
the MC68020 microprocessor. 
It’s faster. It’s fully supported 

in hardware and software. 
It’s backed by what others have 
called, ‘The strongest support 
team in the business?’ And, 
we’ re delivering production 
quantities. Now. 

In fact, last year Motorola 
shipped over 50,000 units 
and this year we expect to ship 
more than a quarter of a 
million MC68020s. 


Software support. Now. 

When you choose the 
MC68020, you get the largest 
body of software available for 
32-bit microprocessor-based 
machines. Operating systems. 
Languages. Tools and utilities. 
Host independent development 
systems. And, of course, appli- 
cations. In fact, 80% of the 
microprocessor-based system 
designs running UNIX® OSs are 


based on M68000 Family chips. 


The fastest just got faster. 

At 25 MHz, the latest ver- 
sion of the MC68020 and its 
earlier 20 MHz version remain 


The MC68020 


the fastest general-purpose 
processors on the market today. 
And fully compatible. But 
speed alone isn’t the answer. 
And for the generation beyond 
the MC68020, we’re com- 
mitted to higher performance 
devices while maintaining the 
M68000 Family software base. 


Chips, boards or boxes. 

Motorola is with you at 
every level. As the world’s 
leader in VMEbus products, 
supplying MC68020-based 
VMEmodule™ and VMEsystem™ 
products, we can work with 
your development team at vir- 
tually every level, including 
technical training. 


on the software. 


Betting the winner. 

There$ a lot of 32-bit 
talk in the press. Sampling 
quantities, blue sky and 

vaporware are fine, but 
maybe youd rather not bet 
your company on them. 
When youre planning to 
build the kind of leading-edge 
systems that win in the market- 
place, Motorola offers you 
speed to market, aggressive 
pricing and the strength of a 
fully-realized 32-bit environment. 
If youre an executive 
evaluating microprocessors, 
software and support, call us 
at 1-800-521-6274. We'll arrange 
a one-on-one management- 
level meeting. Fast. And we'll 
show you why a better micro- 
processor, coupled with here- 
and-now volume production, 
software and support, adds 
up to a winning combination. 
UNIX is a registered trademark of AT&T 
Concurrent DOS and GEMDOS is 
a trademark of Digital Research Inc. 
VERSAdos is a registered trademark 
of Motorola Inc. 
VRTX is a registered trademark of Hunter 
& Ready, Inc. 
RTUX is a trademark of Emerge Systems 
ADA is a trademark of the Department 
of Defense 


VMEmodule and VMEsystem are 
trademarks of Motorola Inc. 
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CLIPPER. THE dBASE ON VIgInse 
A WINNING PERFORMANCE EVERY TIME. 





Nantucket ™ 
Nantucket Corporation 
5995 South Sepulveda Boulevard 


Culver City, California 90230 
(213) 390-7923 LOOK FOR CLIPPER™ 


Outside California call toll-free: 

1-800-251-8438 if 

dBase, dBase III, and dBase III Plus are trademarks 

of Ashton-Tate, Inc. U Um n 

with PC, XI, oes see ae trademarks 

of International Business Machines Corporation. : 

Clipper and Nantucket are trademarks wh MA KES NET WORKING | S 4 
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We'd like to wish everyone a warm Season's Greetings and 
thank our customers for their valued support. 
We're celebrating the holiday season by offering some great 
products at fantastic savings through the end of this year - 
our holiday gift to you. 
As a Programmer's Connection customer, youll be treated to 
the finest service possible. We understand the importance of 
the personal touch and well make your buying experience a 
pleasant and rewarding one. 
It’s our dedication to quality service and low prices that 
sets us apart from the other dealers in this industry. So 
make the connection today and discover the difference for 
| yourself. You'll be glad you did. 
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Please refer to our product list on the next 
two pages for price information. 


MICROSOFT SALE 





EERE List <-Oule . Sale Programmer's Connection Advantages 
Microsoft BASIC Interpreter for XEW/X... 350 239 219 e IBM personal computer specialists 
Buy any supported C, FORTRAN or Pascal Microsoft C with CodeView........... 450 288 268 since 1984. 
compiler at our regular price and get Microsoft COBOL Compiler... 700 445 419 | ow Prices. 
MetaWINDOWS or MetaWINDOWS/Plus for XENIA. 8 Se. Soe 995 639 599 ¢ No membership fees. 
by MetaGraphics for 50% off the retail price. ‘Microsoft COBOL Tools win Detuager 430 A 3. © Most products in stock for fast delivery. 
Se Microsoft FORTRAN Compiler... .. 350 208 199  °®FREE UPS Shipping to U.S. customers. 
EXIM eS , =, Oa 695 445 429  ®Norush fees for express shipping. 
Buy Turbo PASCAL at our regular price Microsoft Learning DOS............ 50 39 35  ©Noextra charges for credit cards, CODs 
of $65 and get MetaWINDOWS or Microsoft LISP Common LISP......... 250 175 159 and POs. 
TurboWINDOW by MetaGraphics for 50% Microsoft MACH 10 Bundled Package . New 549 389 379 e Credit card is charged when the order 
off the retail price. Microsoft MACH 10 Board........ New 399 289 279 is shipped. 
aL Microsoft Macro Assembler......... 150 98 89 ¢ Knowledgeable non-commissioned 
aes Microsoft Mouse Bus Version......... 175. 139° 119 salespeople ‘ 
Buy Microsoft FORTRAN or RM/FORTRAN = wicrosort Mewnaeh scudee nesime.. 300-189-179 ~—-¢ Sound, unbiased advice. 
at our regular price and get any Alpha Microsoft Pascal Compiler.......... 300 189 179. © FREE product literature. . 
Computer Service product(s) for 50% off fomHEWH © Ps Bm 695 445 429 © 30-day guarantees and evaluation 
the retail price. Microsoft QuickBASIC............. 99. 75 59 periods. 
J, Mucreadie: St Bees ee. en 195 °7139 129 
a Microsoft Windows............... 99 _—s« 68 59 
Special Introduction Microsoft Windows Development Kit... 500 329 299 
TurboSmith by Visual Age PHOENIX SALE 
a Pasm86 Macro Assembler............ 195 129 109 
Feature-packed, multi-window debugging Pdisk Hard Disk & Backup Utility........ 195 129 109 
power “animates” your Turbo PASCAL Pfantasy Pac Phoenix Combo.......... 1295 879 829 
source programs! Pfinish Performance Analyzer.......... 395 239.219 
Pfix-86 Plus Symbolic Debugger........ 395 239.219 
i PforCe Comprehensive C library......... 395 239 219 
List $58 Ours $45 Plink-86 Plus Overlay Linker.......... 495.329 299 
a Pmaker Make Utility ............... 125 89 79 
' Pmate Macro Text Fditor............. 195. 119 109 
Buy Turbo PASCAL at our regular price of pabtitchs Wott c h ka. Coes 295 159 149 
$65 and get TurboSmith by Visual Age at Ptel Binary File Transfer Program........ 195 119 109 


50% off the retail price for only $29. 
a a 


Sale prices and special offers are available until 12/31/86. 
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apllanguage PASCAL TOOLS 2. ob. vases cnc ieee. 100 On-line Help from Opt-Tech Data Proc .......... 149 109 
APE PLUS/ Pe DF STISE. 28S ass New Version 595 449 PASCAL TOOLS & PASCAL TOOLS 2....... 175 135 PANEL by Roundhill Computer Systems .......... 295 224 
APL*PLUS/PC Spreadsheet Mgr ty S7SC..... 195. 149° RUNOFF Text Fonmatiar :2 3. oo. oe as es 50 45 = PC Lint by Gimpel Software ...........0.005. 139 105 
APL*PLUS/PC Tools Vol 1 ty S7SC ......... 295. 199 TURBO ASYNCH PLUS .................. 100° = 83° PLOTHI by The Librarian... 636s 82 175 CALL 
APL*PLUS/PC Tools Vol 2 ty S7SC ......... 85 59 TURBO POWERTOOLS PLUS............. 100 83 PLOTHP dy The Librarian..... 0.2... ee eee ee 175 CALL 
APL*PLUS/UNX For AT XEWIX by STSC ........ 995 695 VIEW MANAGER Specify C or Pascal. ......... 275 199 Sci Subroutine Library ty Peerless ........... 178.1438 
Btrieve /SAM File Mor by SoftCraft............. 250 19% pborland pro ducts Vector87 dy Vectorplex Data Systems....... New 120 109 
Financial/ Statistical Library ty S7SC ......... 275 195 REFLEX data Base System... ....-.ecceeces- 150 99 Vitamin C dy Creative Programming ............ 150 135 
Pocket APE 8 SISC” 6.528. wks Cee cals 95 63 REFLEX Workshop...................... 70 48 VC Screen Forms Designer. ..........0206. 100 =84 
STATGRAPHICS by S7SC ...........---04. 795 599 REFLEX & REFLEX Workshop ............. 200 129  Zview Sy Data Management Consultants ......... 245 189 
arity products Turbo DATABASE TOOLBOX.............. 70 4 Cobol language 
Arity Combination Package ........... New 1225 1139 Turbo EDITOR TOOLBOX ................ 70 48 Wicro Focus COBOL Workbench ........... 4000 3379 , 
Expert System Development Pkg.......... 295 259 Turbo GAMEWORKS TOOLBOX ........... 70 48 = WMicro Focus Level 1 COBOL .............. 1500 549 
File Interchange Toolkit................ 50 45 Turbo GRAPHIX TOOLBOX ............... 70 «648 CORRAPIIES oo i ee Ca ee 250 199 
PROLOG Compiler & Interpreter ......... 795 -° 699." "Faria LIGHRERMING 23 fo heck co cc ede Sees 100 65 ONT SF on ek Repel ae 200 159 
Screen Design Toolkit ................. 50 45 @Turbo PASCAL with 8087 and BCD ........... 100 +=65 Pee ok ee eee 300 259 
SOL Development Package ............. 295 259 Turbo Prolog Compiler................... 100 + =#65 Level Il Animator ..............ceeceee 900 349 
Arity PROLOG Interpreter ................ 350 309 Turbo TUTOR for Turbo PASCAL ............. 40 28 Level Il SOURCEWRITER .............. 2000 CALL 
Arity Standard Prolog ................... 95 79 Word 5 aia TE Ce ee PE EE ERS 70 48 Micro Focus Level I! COBOL forWovell ....... 2000 1699 
artificial intelligence Micro Focus Micro/SPF ................. 175 149 
Pete bp Pia lage S636 oak bess skate Ack 395 339 Micro Focus Professional COBOL .......... 3000 2295 
APT from Solution Systems .........0000 New 65 CALL Multi-user Runtime for PC Network ......... 500 429 
Autolntelligence by /ntelligenceWare....... New 990 CALL @Microsoft COBOL .................. Sale 100 419 
ESP ADVISOR by Expert Systems Intl .......... 895 839 Microsoft COBOL Tools w/Debugger ..... Sale 350 199 
PROLOG-2 Interface .. 2.02.0... 05.30%. 395 369 Reshe LOM. cs cai os New Version 995 785 


ExpertEDGE Advanced by Human Edge .... New 2500 CALL RM/COBOL by Ryan-McFarland .............. 950 639 


ExpertEDGE Professional by Human Fdge .. New 5000 CALL RM/COBOL 8X AWS/ 85 by Ryan-McFarland ..... 1250 895 
cee : ee: bro wl vga oe a debuggers & profilers 
evelopment Software hy EXSYS ......... 386 DEBUG Cross Debugger by Pharlap ........ Wa 138 
First Class by Human Edge ...........20005. 495 399 Advanced Trace-86 by Morgan Computing. ...... 175 125 
GCLISP Golden Common LISP by Gold WHE as & 3/5 was 495 CALL e++ Cl Probe ty Computer Innovations ............. 225 189 
. nae ser ah WOR boas aig 9 W = oe CH+ tom Fullness Pk New 195 179 ect no av SOM a6 v0 sia" gs a a os 
Insight 2+ by Level Five Research ............. 485 379 Ccomp ilers DSDB6 by Soft ea. th A RRS 70~—s«& 
Intelligence/Compiler /ntelligenceWare ........ 990 749 €-86 by Computer Innovations ................ Sec MEN) OORT S, CeptNaeret oS. se, 100 89 
Logic-Line Series 1 by Thunderstone .......... 90 85 Datalight C Compiler Sma// Mode/............ OC 98 parscage hy Dale Base Decisions |... 5... 295 245 
Logic-Line Series 2 by Thunderstone .......... 125 115  Datalight Developer Kit w/Large Mode/........ 93 79 Periscope Il w/NM/ Breakout Switch ........... 145 109 
Logic-Line Series 3 by Thunderstone .......... 150 139 DeSmet C w/Debugger...............2005. Von: TAB: Berisegne WK Solvers aay J. : becce ac. 115 84 
LPA microPROLOG dy Prog Logic Sys ......... 99 89 DeSmet C w/Debugger & large Case........... 209 193 The PROFILER with Source Code i DWE Pies hes 125 94 
ETE yb oe se OU Paw LAE RY ees 149 129 Eco-C Development System by Ecosoft .......... 125 83 The WATCHER Profiler by Ston ‘toak ay se 60 8655 
LPA Professional microPROLOG ........... 395 339 Lattice C Compiler from Lattice.............. 500 294 f h | rece oe 
2 Se ae earner nna 650 569 Mark Williams Let'sC................... 75 88 ort tanguage 
Compiler / Interpreter ............. New 495 CALL with csd Source Debugger............0000. 150 109 CFORTH Wative Code Compiler by LMI .......+.. 300 239 
@Microsoft LISP Common USP .........-. Sale 250 159 . Mark Williams MWC-86 ................. pg Ma ae hoe eee I le tea 
PC Sclieme by Texesinsthiments ...... 2... New 95  §5 @Microsoft C with CodeView.............. Sale 450 268 PC/Forth by Laboratory Microsystems .......... 150 119 
Parséual Consultant Ett iy sss... New 495 439 UniWare 68000/10/20 Cross Compiler... ew 595 CALL PC/Forth+ by Laboratory Microsystems Wthanweee 250 209 
Personal Consultant Plus ty 7/ .......... New 2950 2599 Wizard C Combo by Wizard Systems....... New 150 599 neath dns at a 
Personal Consultant Runtime ........... New CALL CALL Wizard C Compiler.................... 450 359 Rare oe assay ange gov ea ere a om ae 
PROLOG-2 Interpreter by £5/.............. 450 419 ROM Development Pkg ............. sa A ER ee +H etait Rating 
PROLOG-2 Interpreter and Compiler ........ 995 839 Cinterpreters Wie toe te Oe eee 200 159 
QNIAL by MAL Systems... ..... 0.000.000, 375 349 C-terp by Gimpel, Specify compiler............. 300 235 Sy scens LA Marcang Bones 
y cocduiags B Sy impel, opecity comp PCTERM Modem Pgm for Smartmodem ....... 100 79 
TransLISP from Solution Systems ......... New 95 CALL C Trainer with Software by Catalytix........... 122 CALL Software Floatina Point 100 79 
Turbo PROLOG Compiler ty Borland Inti ....... 100 75 Instant C sy Rational Systems. ...........4-.. 500 CALL ypR/Forth ig alone? Misowvetens eh Uh New 350 279 
asse m b i y ia ng ua ge Introducing C by Computer Innovations. ......... 125 104 Object Module Libraries ee 2, New 500 395 
386 ASM/LINK Cross Asm by Phar lap......... 495 CALL Pun/C from liteboot ....................0. ao 82 Seuten fade hicpese 525 chs eve: New 1500 995 
8088 Assembler by 2500AD ........ TR 100 89 Run/C Professional from Lifeboat ............ 250 169 fortran lan : ‘ua : e s 
ASMLIB Function Library by BC Assoc. .......... 149 129 Cutilities 50 MORE: FORTRAN 4 19M En a 125 99 
asmTREE 8-Tree Dev System by BC Assoc.... New 395 339 APT by Shaw American Technology............. 395 2939 acs Time Series A/pha oe wtar ae AAAS 495 419 
Cross Assemblers Various 2500AD ........... CALL CALL Basic C Library ty C Source ..............-. 175 129 © Btrieve /SAM File M . P eae Lge 250 194 
@® Microsoft Macro Assembler........... Sale 150 89 C Essentials ty Fssential Software ............ 100 CALL Essential Gra seh bees Sofimare iste eS 250 195 
Norton Utilities by Peter Norton .............. 100: 69 C-ISAM by Informix’... ee ee eee 225 195 @ For-Winds Geis Rierh ter 90 78 
Turbo EDITASM DY SOBGOWOA 2 ie ec ee 99 84 C to dBase by Computer Innovations ........... 150 135 @Forlib-Plus er ha pick shad Ramis 3) Sok ote a. 70 54 
UniWare Cross Assemblers Various ...... New 295 CALL  C-tree /SAM File Manager by FairCom........... 395 329 “ egrTLip p ae Free SR tee 95 CALL 
Visible Computer: 8088 Software Masters ...... 80 65 _ f-tree Report Generator .............. New 295 249 EQpTRAN Addenda b Petite Bans rc \ ee. 95 89 
basic language c-tree & r-tree Combo Package ........ New 650 529 EQRTRAN Addendum by Impulse Engr... 165 149 
BetterBASIC by Summit Software........... 200 129 C Utility Library Essentia/......... New Version 185 135 GRAFLID iy The brand ee 175 CALL 
8087 Math Support ................... 99 75 © Windows by Syscom................+44. 100. 89 HALO by Main Cyhernetics ..... 2.252.002. 22. 300° 209 
Btrieve Interface ..................... 99 75 © Wings by Syscom ...........-. +... 200 50 - 45 1/0 PRO w/No Limit Library by MEF... 390 349 
ROO eins cs ids as shade, 99 75 «GE ROMPac by Computer Innovations........... 195 139 Microcompatibles Combo Package fire eee, 240 219 
Run-time Module..................... 250 169 SbQUERY by Raima ............. 2.20. 20s. Pe eee MMMM scaler e oauay Ng 135 119 
EXIM Services Toolkit 4y EXIM ......... Wor CALL EADLS SPE oe ep ee res Orta ee fe. Sa pote’, OO cies alice otto eee 
aside Track fom Mie ene a Bg. AAVISTA Mater IS by Raine oo 435 28 Ne iat pmee emma 29 15 
MACH 2 by MicroHelp..........0.00.0005. 75 ~=65 with Source Code ......++-++-++seeeerees 930 845 PANEL Secu Designer b Roundhill Pease this 295 224 
@ Microsoft QuickBASIC............... Sale 99 §9 “Bx dBase/C Translator by Desktop Al........... $50. 325° -PLOTUE fy Thebans Jareee, rcs, 175 CALL 
Peeks ‘n Pokes from MicroHelp .......... 45 39 EFntelekon Combo Package................ 200 169 BLOTHP ty The Librarian... 175 CALL 
Professional BASIC Sy Morgan.............. 99 75 © Function Library.................... 130 109 @pi/FORTRAN AyanMcfarland. 2... 595 389 
OTM EN eter 336, ecw SO a ere Se sane 3 ag, Sci Subroutine Libvaty by Peerless... J sccnc 7B 438 
Stay-Res by MicroHelp ..........0.005. New 95 85 nl outs ter Bien Pe ea en geen ea ee @Statistician A/pha Computer Service............ 295 249 
True Basic w/BASICA Converter... .. New Version 200 105 Essential Comm Library with Debugger .... New 250 = g @Strings & Things A/pha Computer Service 70 54 
True Basic w/Converter & Run-time... ....... 295 199 Breakout Debugger Any /anguage ....... eile VacterS? by Vactinlic ete Stone Mew 120-408 
Advanced String Library................ 50 45 _ Essential Comm Library ............ Now 188 135 ibeaibauibeaeie st 
Asynch Communication Support.......... 50 45 Essential Graphics dy Fssential Software........ 250 195 9gSSs pro ucts i 
MON Bait oe 50 45  Flash-up Windows sy Software Bottling ........ 99 «©3©.:-« 7g-—~=SOs GSS Graphics Development Toolkit ......... 495 375 
Dulevs thiarhice eee 50 45 GraphiC Mono v2.2 by Sci Endeavors ........... 280 209 GSS Kernel System for 00S ............... 495 375 
Developer's Toolkit ................... 50 45  GraphiC Color v3.0 by Sci Endeavors ........... 350 289 GSS Kernel System for JBM AT..........045. 795 649 
ied i ae ea 50 45 GRAFLIB by The Librarian ................4. 175 CALL GSS Metafile Interpreter ................. 295 239 
Heichiss Graphic Suet 50 45 Greenleaf Comm Library by Greenleaf ......... 185 134 GSS Plotting System .................... 495 375 
Ree ue Mudbles cs eS 150 109 Greenleaf Data Windows by Greenleaf .... New 225 189 GSS SOLUTIONS Chart.................. 295 239 
Sorting & Searching ............ 50 «h«SC*«WWith Source Code ...... 0.0.0. e ee eee. New 395 329 GSS SOLUTIONS Plottalk................ 295 239 
Sy hs Ee a Greenleaf Functions by Greenleaf ............ 185 134 GSS SOLUTIONS Terminal ............... 295 239 
blaise products The HAMMER by OES Systems .............. 199 149 lattice products 
ASYNCH MANAGER Specify C or Pascal ....... 175 135 HALO by Media Cybernetics ..........00 0000. 300 209 Lattice C Compiler from Lattice... ........... 500 294 
Se PRN oe oT et eee heed os bio oe bs Fao: DE: HEMP / Conte ty MOS. ==. oS. dks 125 109 with Library Source Code .........0.00c00es 900 545 
: eats : peter eee terete HR eles 100 79 @MetaWINDOWS Wo Aoyalties...... 2... ee ee 185 115 C Cross Reference Generator.............. 5p 39 
Sear . tio Care's Wace wee giv oe «sha eh 175 135 MIT IN Sos ete a 80 58 wath Source Cade 0.25 ie be ee 200 149 
Rota nh oe afb pine riaea dee oa ee 95 75 @MetaWINDOWS/Plus ty Metagraphics ........ 235 189 C-Food Smorgasbord Function Library ......... 150 98 
Reewsris Skies sR Gy. oe ee 125 99 MMOFDU TS AOS. oh etek clots xe 2354 189 with Source COG: . 5 oo soins ook 6 We s chek be oe 


6 These products have sale prices or special offers that are available until 12/31/86. Turn to the first page of this ad for more information. 
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C-Sprite Sourte Level Debugger ...........+5: 





Curses Screen Manager ........0ssecceeeees 
TN AED CINE Te Sil oid Bc. e Vieie sk we bie WES 
dBC dBase File Manager forC .... 1... ee ee eee 
Wi SOME CONE eno eo Ss cs cs eae ws 500 378 
BONN NE PM eis 5 ce ese ee ees 195 145 
RPG Il Compiler Wo Royalties ............44. 750 635 
RPG Il Combo with SEU & Sort/Merge ...... New 1100 939 
SecretDisk File Encryption Utility ............. 120 #8694 
SideTalk Resident Communications ............ 120 94 
Text Management Utilities ................ 120 94 
TopView Toolbasket Function Library .......... 250 189 
NEI ne dec nk de ed eA winnie 0 500 378 
Z-80 C Cross Compiler .................. 500 378 
with Library Source Code ......0.eeceeceees 1000 749 
logitech products 
LOGIMOUSE C7 Mouse Hardware ...........- 99 85 
SHATLUS TIGRE thee tae s Temes decseuss 119 99 
with PLUS Pkg & PC Paintbrush .......00000 169 145 
with PLUS Pkg & CAD Software ........200085 189 159 
with PLUS Pkg & CAD & Paint........0045 New 219 189 
MODULA-2/86 Holiday Package........ New 199 159 
MODULA-2/86 Compiler................. 89 63 
MODULA-2/86 with 8087 Support ......... 129 103 
MODULA-2/86 with PLUS Pkg............ 189 147 
LIMFATY SOUTCRS io.6 os eva c kiss a. dwie e ave 99 689 
Wee RS ts cade oh texwkwaw'e oe 27 
gO a ere eae 199 179 
Run Time Debugger .................-. 69 89 
Turbo to Modula Translator ............. 49 45 
DOENE PORRID oo io ob ecn oe hab wa os: 49 45 
Winbent PRIMA 65 50 fos heed cie ei ened 49 45 
REPERTOIRE for MODULA-2/86 by PM/ .... New 89 79 
microport products 
System V/AT by Microport Systems ....... New 440 395 
RUNTIME SYSTEM (Operating Sys)...... New 160 145 
SOFTWARE DEVELOPMENT SYSTEM Wew 170 155 
TEXT PREPARATION SYSTEM ....... New 170 155 
USER UPGRADE 3 to 8 Users......... New 100 85 
microsoft products 
@Microsoft BASIC for XEWX ............. Sale 350 219 
@Microsoft C with CodeView ...........+-- Sale 450 268 
Microsoft COBOL Compiler ........... Sale 700 419 
Ta NN oo is spice ease tw he we Sale 995 599 
@Microsoft COBOL Tools with Debugger .... Sale 350 199 
Tes ON hia, ck ob a8 es CE eo ee F Sale 450 289 
@Microsoft FORTRAN Compiler .......... Sale 350 199 
Or ieee en ars te oa oO Ss Sale 695 429 
Microsoft Learning DOS .............. Sale 50 35 
@ Microsoft LISP Common LISP ........--. Sale 250 159 
®Microsoft MACH 10 Bundled Pkg ......... Sale 549 379 
@ Microsoft MACH 10 Board ............ Sale 399 279 
@ Microsoft Macro Assembler........... Sale 150 89 
@Microsoft Mouse Bus Version ........... Sale 175 119 
@Microsoft Mouse Seria/ Version.......... Sale 195 129 
@ Microsoft muMath /ncludes muSiIMP ...... Sale 300 179 
@Microsoft Pascal Compiler............ Sale 300 179 
YE | eA ee er eee Sale 695 429 
@Microsoft QuickBASIC............... Sale 99 59 
@icreeslt Sat. el ence Sale 195 129 
@Microsoft Windows .............---- Sale 99 59 
@ Microsoft Windows Development Kit .... Sa/e 500 299 
other languages 
CCS MUMPS Single-User by MGlobal .......... 60 55 
CCS MUMPS Multi-User by MGlobal........... 450 379 
Janus/ADA C Pack dy R&R Software.......... 95 89 
Janus/ADA D Pack by A&A Software ......... 900 795 
Methods Smalitalk by Digitalk........+00-000+ 79 ~=s«éG68’ 
Personal REXX dy Mansfield Software........-- 125 109 
Smalltalk/V by Digitalk 2.0... cece eee ee eee 99 —s« 88 
a a ae New 49 45 
SUOROLA 4 by Catspawe © 65. 66s Faken so ono 95 84 
other products 
Dan Bricklin's Demo Pgm Software Garden ..... 75. 69 
FASTBACK by 5th Generation Systems ........-. 179 149 
Informix for DOS by Informix... 0... eee ee eee 795 639 
Informix4GL for DOS by Informix... 0... ee eee 995 799 
InformixSQL for DOS by Informix .......600045 795 639 
Instant Replay 4y Vostradamus .......... New 90 79 
Interactive EASYFLOW by Haventree ......... 150 129 
MKS Toolkit with vi by MKS 2.0... ce eee ee eee 139 119 
Norton Commander dy Peter Norton....... New 75 55 
OPT-Tech Sort by Opt-Tech Data Proc........-- 149 115 
PrintQ by Software Directions ........++++++-- 89 84 
Quilt Computing Combo Package ........... 199 169 
QMake Program Rebuild Utility .......-0-55- 99 = 84 
SRMS Software Revision Mgmt Sys ......+-+- 125 109 
screenplay a// varieties by Flexus .......+.- New CALL CALL 
SoftScreen/HELP by Dialectic Systems .... New 195 149 
Source Print by A/debaran Labs ........+++46: 139 115 
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LOWEST PRICES 


Since this ad is prepared in advance of 
publication, some of our current prices may 
be lower than what's advertised here. Call 
for latest pricing. 


FREE SHIPPING 


Orders within the USA (including Alaska 
Hawaii) are shipped FREE via UPS. Express 
shipping is available at the shipping carrier's 
standard rate with no rush fees or handling 
charges. To avoid delays when ordering by 
mail, please call first to determine the 
exact cost of express shipping. 


CREDIT CARDS 


VISA and MasterCard are accepted at no 
extra cost. Your card is charged when your 
order is shipped. Mail orders please include 
credit card expiration date and telephone 
number. 


CODs AND POs 


CODs and Purchase Orders are accepted at 
no extra cost. POs with net 30-day terms 
are available to qualified US accounts only. 


FOREIGN ORDERS 


Shipping charges for foreign and Canadian 
orders are based on the shipping carrier's 
standard rate. Since rates vary between 
carriers, please call or write for the exact 
cost. Foreign orders (except Canada), please 
include an additional $10 for customs form 
preparation. All payments must be made 
with US funds drawn on a US bank. Please 
include your telephone number when order- 
ing by mail. Due to government regulations, 
we cannot ship to all countries. 


VOLUME ORDERS 
Call for special pricing. 


SOUND ADVICE 


Our knowledgeable technical staff can com- 
pare products, answer technical questions 
and send you detailed product information 
tailored to your needs. 


30-DAY GUARANTEE 


Most of our products come with a 30-day 
return guarantee or a 30-day evaluation 
period. Please note that some products are 
restricted by their manufacturers from this 
guarantee. Call for more information. 


CALL TOLL FREE 
US 800-336-1166 
CANADA 800-225-1166 
OHIO 216-877-3781 


CUSTOMER SERVICE 216-877-1110 


Hours: Weekdays 8:30 AM to 8:00 PM EST. 
Ohio customers please add 5% state sales tax. 
Call or write for our FREE comprehensive 
price guide. 

Prices are subject to change without notice. 


136 SUNNYSIDE ST. HARTVILLE, OHIO 44632 
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Taskview by Sunny Hill Software ........0..06- 


TLIB by Burton Systems Software .......... 1 if 
VTEK erm Emulator by Sci Endeavors....... hed 150 
phoenix products 
@ Pasm86 Macro Assembler ............-. Sale 195 
®@ Pdisk Hard Disk & Backup Utility .......... Sale 195 
@Pfantasy Pac Phoenix Combo............ Sale 1295 
@Pfinish Performance Analyzer ... 2.2.2.5... Sale 395 
@ Pfix-86 Plus Symbolic Debugger.......... Sale 395 
@PtorCe Comprehensive C library .......... Sale 395 
@Plink-86 Plus Overlay Linker ............ Sale 495 
@Pmaker Make Utility... 0.6... eee Sale 125 
Pmate Macro Text Editor ............04- Sale 195 
OF ie-6 TAY 6 SS ee Pees Sale 295 
@Ptel Binary File Transfer Program ........... Sale 195 
polytron products 
PolyBoost 7he Software Accelerator......... New 80 
Polytron C Beautifier .. 2.2.2.0... cw eee 49 
POON IIIT ico. 6 oe A oe lees 99 
Polytron PowerCom Communications .......... 179 
PolyLibrarian Library Manager ............-4- 99 
PolyLibrarian Wl Library Manager ............. 149 
PolyMake UMIX-like Make Facility ........0005 he) 
PolyWindows Products A/ Varieties .......... CALL 
PolyXREF Complete Cross Ref Utility ........... 219 
PolyXREF One language only ............445- 129 
PVCS Version Control System .......0.00.0005 395 
softcraft products 
Btrieve /SAM Mor with No Royalties ............ 250 
Xtrieve Query Utility ........44. New Version 245 
Rtrieve Report Option......... New Version 145 
Btrieve/N for Networks... 0.0... ee eee eee 595 
OER Sere a's ek a Seas New Version 595 
Rtrieve/N Report Option ....... New Version 345 
text editors 
Brief from Solution Systems ........2000e eens 195 
Epsilon Fmacs-like editor by Lugaru...........4. 195 
KEDIT by Mansfield Software ...........0006. 125 
PC/VI dy Custom Software Systems ............ 149 
SPF/PC by Command Technology Corp.......... 195 
Viedtl by Con RUN OW 6 oss 55 0 gel cds oh ole'ys 150 
Vedit Plus by CompuView .......... Pree ore 185 
turbo pascal utilities 
ALICE /nterpreter by Software Channels .......... 95 
Btrieve /SAM File Mgr............ See SoftCraft 250 
FirsTime for Turbo by Spruce Tech ........... Mae 
Flash-up Windows dy Software Bottling ........ 90 
HELP/Control by MOS... 1.0... eee ee eee 125 
On-line Help from Opt-Tech Data Proc .......... 149 
Report Builder by Royal American......... New 15 
Screen Sculptor by Software Bottling .......... 125 
System Builder by Royal American ........ New 100 
TDebugPLUS dy TurboPower Software.......... 60 
Turbo EXTENDER by TurboPower Software ...... 85 
Turbo Professional by Sunny Hill... ......-4.. 70 
Tepe) Fame cs since hes 129 
TurboPower Utilities by TurboPower .......... 95 
TurboRef by Gracon Services ........0005000: 50 
@TurboSmith Visual Age Debugger .........655: 58 
@TurboWINDOW by MetaGraphics..........4.. 80 
wendin products 
Operating System Toolbox ................ 99 
PCUNIX Operating system ........0.0 0000 0es 99 
PCVMS Similar to VAX/VMS 2... ec eee eee 99 
XTC Text editor with Pascal source ..........++5 99 


xenix system V 
See also Microport System V/AT section. 


XENIX System V Complete System ty SCO .... 1295 
XENIX Development System............. 595 
XENIX Operating Sys Specify XT/AT........ 595 
XENIX Text Processing Package ......... 195 

xenix products 

APL*PLUS/UNX For AT XEWIX by STSC ........ 995 

Btrieve /SAM File Mgr by SoftCraft..........66. 595 

CASA ty UateOIE 5 sie siege 0 sev eole'e edie 319 

c-tree /SAM Mgr w/Source by FairCom .......+++ 395 

dBx dBase/C Translator by Desktop Al... 2.62.46. 550 

dbVISTA Single or Multi User by Raima. ......... CALL 

infornix by faformix .. 0.0.20 cece eeeecees 995 

Informix4GL by /nformix .. 0.66. ee ee 1500 

InformixSQL by /nformix .. 2... eee ee eee 995 

LTIN by IPOTIN SS vais sine oie oe vy Cute stiy 595 

Micro Focus Level 1! Compact COBOL ....... 1000 
POR REE ccc ahen do cle see oys eats, tied 6S tie 400 
Level ANIMATOR ©. ce cca cece 600 

@ Microsoft Languages .................-6- CALL 

Networks for XENIX by SCO .. 2.2... ee eee 595 

PANEL Screen Designer by Roundhill ........+.. 750 

RM/COBOL by Ryan-McFarland ........-.406- 1250 

@RM/FORTRAN by Ayan-McFarland..........-- 750 

SCO Professional lotus clone by SCO .......... 795 


lw hn 


123 


109 
109 
829 
219 
219 
219 


999 
499 
499 
149 


695 
464 
285 
329 
499 
CALL 
795 
1199 
795 
449 
795 
319 
479 
CALL 
495 
549 
949 
549 
595 
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| Listing Four (Listing continued, text begins on page 16.) 


pop ds ; restore ds 
iret ; return from interrupt 





; system interlock 


tick: mov t_astrm,0OFFh ; terminate application task 
sys entr tmrflg ; enter system state 


; set machine environment 


sys sctx ; Save processor context 
push bp ? protect bp 

mov bp, sp 3 mark stack location 
lea ax,tmr_xtm ; accumulate psuedo time 
push ax 

call t_rtmark 

mov sp,bp 


mov tmrpxtm,ax ; store prior pointer 
; real time system processing 


inc tmr_det ; remove display harmonics 
mov al,DSPCT 
xor al,tmr_dct 
jnz tick4 

mov tmr_dct,al 
push tmr_dspl 
call w_cdspl 
Mov sp, bp 

inc tmr ict 
inc tmr_tket 


display physical window 


ve 


restore stack pointer 
increment interrupt counter 
increment tick clock 


38 te Se 


; time base generation 


mov ax, ISKPO : long term time base correction 
xor ax,tmr_ict 

jnz tickl 

mov tmr ict,ax 

call ticks ; update system tick clock 


tickl: inc tmr_idvO  ; generate clock time base 
mov al,IDVO 
xor al,tmr idv0 


nz ticks.“ 

mov tmr_idv0,al 

call tick5 ; update system tick clock 

inc tmr idvl ; primary alternate time base correction 


mov al, ISKP1 
xor al,tmr idvl 


jnz tick2 ~ 

mov tmr_idvl,al 

int RLCINT ; update alternate time base 

inc tmr idv2 # secondary alternate time base correction 


mov al, ISKP2 
xor al,tmr_idv2 


jnz tick2 

mov tmr_idv2,al 

int RLCINT ; update alternate time base 
tick2: int RLCINT ; update alternate time base 


; terminate interrupt service 


tick3: push tmrpxtm =; restore original psuedo time accumulator 

call t_rtmark 

mov sp,bp 

pop bp # restore bp 

test tmrflg,0OFFh ; test for interrupted system task 

jnz tick4 

XOX ax,ax ; terminate task 

mov tmr_ilck,al ; enable reentrance 

retn * near return to system task management 
tick4: sys rctx ; restore processor context 

cli :; interrupts off 

mov tmr_ilck,0 ; enable reentrance 

pop ds # restore ds 

iret : return to interrupted task 


; update system tick counter 


ticks: mov ax,td tct ; test for no overflow 
inc ax 
cmp ax,td ref 
jne tické 
call td__upd ; update clock 
xOY ax,ax ; reset tick counter 


mov td ref,ax 
mov td_tct,ax 

tick6é: inc td tet s increment tick counter 
retn * return 


t_tick  endp 


comment ~ 
tmr__ int initialize timer 


tmr__int() 


All data areas necessary for clock maintenance are initialized. The hardware 
timer is programmed for the appropriate rate and its interrupt vector is made 
to point to sys tmr. The original vector is relocated and will be used by 
sys_tmr as the alternate time base. 


tmr_ int proc near 
call tmr_dsi ; diable interrupts 


(continued on page 76) 
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Finally, powerful graphics 
for Turbo Pascal! 


Announcing: 


TurboHALO Graphics! 


e 150 graphic primitives (based upon the powerful 
HALO primitives). 


e Graphics in up to 16 colors, in medium or high resolution, 
on 10 popular graphics cards—including IBM CGA 
and EGA, Hercules, and AT&T DEB. 


e Output to over 20 printers and plotters— including HP 
and Corona Laser and Apple Imagewriter. 


e 11 popular input devices supported. 


e Memory resident drivers require only 2K of Turbo Pascal 
code space. 


e These professional graphics programs use 
HALO Primitives: 


Drafix Il — Foresight Resources 
CADKEY-— Micro Control Systems, Inc. 
Dr. Halo II— Media Cybernetics/IMSI 
CAD Master — Datagraphics 

Decision Master — Centec 

Artworks — West End Films 


e Speed, ease of use, multiple fonts and much more, for 
ONLY $129.00! NO ROYALTY FEES! 


COMPARE THE FEATURES! 
TurboHALO vs. Borland’s Turbo Grafix ToolBox: 
Feature TurboHALO Borland 
16-Color Support? Yes No! 
Full EGA Support? Yes No! 


Laser Printer Support? Yes No! 


Multiple Input Drivers? Yes No! 


Do Professional Programs 
Use Same Primitives? Yes No! 


Call Now To Order! 
1299 Fourth Street e San Rafael, California 94901 ¢ (415) 454-7101 
Toll Free (800) 222-GRAF (Outside CA ) ¢ (800) 562-GRAF (In CA) 


Circle no. 293 on reader service card. 
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MULTITASKING 


Introducing 


MultiDos Plus 
The new multitasking software 
for the IBM-PC. 


Ideal for developing applications 
in process control, data acquisi- 
tion, communications, and other 
areas. Check these features which 
make MultiDeos Plus an unbeat- 
able value. 


e Run up to 32 programs concur- 
rently. 

e Your software continues to run 
under DOS. No need to learn a 
new operating system. 

e Use the compilers you already 
have. Supports software written in 
any language. 

e Operator commands to load/run 
programs, change priority, check 
program status, abort/suspend / 
resume programs. 

e Programmatic interface via INT 15H 
for the following. 


* |ntertask message communica- 
tion. Send/receive/check mes- 
sage present on 64 message 
queues. 

Task control by means of 

semaphores. Get/release/check 

semaphores. 

Change priority-128 priority 

levels. 

Suspend task for specified 

interval. 

Spawn and terminate external 

and internal tasks. 

Disable/enable multitasking. 

and more! 

e Runs most commodity software 
including: Lotus 1-2-3, Dbase, 
Wordstar, and others. 

e \Independent foreground / 
background displays. 

e Access to DOS while applications 
are running. 


Hardware/Software Requirements 
IBM PC/XT/AT or true clone. Mono- 
chrome/CGA display adaptors or 
equivalent cards only. Enough memory 
to hold MultiDos Plus (48 KB) and 
all your application programs. Also 
may need 4 or 16 KB memory for 
‘hidden screens’ for each active task. 
MS-DOS (or PC-DOS) 2.0 or later 


operating system. 


ony P2995 a s55 1 


ee ee eee 
Outside USA add $7.95 shipping and handling. 


Visa and Mastercard orders call toll- 
free: 1-800-367-6707. In Mass call 
617-651-0091, or send check or money 


der to: 
=~" NANOSOFT 
13 Westfield Rd, Natick, MA 01760 


MA orders add 5% sales tax. Write for 
source code and quantity price. 
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ALTZ 
LISP 


The universal, superefficient 
LISP for MS-DOS and CP/M. 


Waltz Lisp is a very powerful and complete 
implementation of Lisp. It is substantially 
compatible with established mainframe Lisps 
such as Franz (the Lisp running under Unix), 
Common Lisp, and MacLisp. 


Cris In independent tests, Waltz Lisp 
was up to twenty(!) times faster 
than competing microcomputer Lisps. 
Grin Built-in WS-compatible full- 
screen file editor. Full debug- 
ging and error handling facilities are available at all 
times. No debuggers to link or load. 


Gar Random file access, binary file 


Support, and extensive string 
operations make Waltz Lisp suitable for general 
programming. Several utilities are included in the 
package. 


, Functions of type /ambda (expr), 
Aue nlambda (fexpr), lexpr, macro. 


Splicing and non-splicing character macros. Full 
suite of mappers, iterators, etc. Long integers (up 
to 611 digits). Fast list sorting using user defined 
comparison predicates. Built-in prettyprinting and 
formatting facilities. Nearly 300 functions in all. 


Gores Transparent (yet programmable) 
handling of undefined function 
references allows large programs to reside partially 


on disk at run time. Automatic loading of initializa- 
tion file. Assembly language interface. 


Each aspect of 
Superbly documented. the internieteris 
described in detail. The 300+ page manual 


includes an exhaustive index. Hundreds of illustra- 
tive examples. 


16-bit versions require DOS 2.x or 3.x and 128K 
RAM (more recommended). 
Z-80 version requires CP/M 
2.x or 3.x and 48K RAM 
minimum. Waltz Lisp runs 
on hundreds of different 
computer models and is 
available in all disk formats. 


$169 


*Manual only: $30 (refund- 
able with order). Foreign 
orders: add $5 for surface 
mail, $20 for airmail. COD add $3. Apple CP/M, hard 
sector, and 3” formats add $15. MC/Visa accepted. 


For further information or to order call 


1-800-522-LISP a 
In NJ and outside USA call 1-201-755-LISP 


|2 Y 475 Watchung Ave. 
RO ODE Watchung, NJ 07060 








ees | TERNATIONAL 
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Listing Four (Listing continued, text begins on page 16.) 


mov ax,dgroup ; set data segment 
mov sys dgrp, ax 
MOV ax,cs ; set code segment 


lea si,sys_stat 

mov [si].rcs,ax 

cli ; interrupts off 

mov tmr_ilck,OFFh ; lockout-t_tick 

mov bx,tmr_sync ; test for no synchronization function 


test bx, bx 
jz into 
lea bx,tmr_sync ; synchronize timer interrupt 
call [bx] 
jmp short intl ; continue 
into: call tmr tmr ; start timer 
intl: call t rdclk ; set real time clock phase 


mov t_rttick, ax 

mov t _rtrfct,ax ; set reference count 

mov t_rtactg,offset ee ; initialize time accumulator 
call td_set =; set current time 


sti ; interrupts on 

XOr ax,ax : form 0 

push ds ; protect ds 

mov ds,ax ; relocate original interrupt vector 
mov di,ax 

cli 


mov ax, [di+4*TMRINT] 

mov [{di+4*RLCINT],ax 

mov ax, [di+4*TMRINT+2] 

mov [di+4*RLCINT+2], ax 

mov ax,offset pgroup:t_tick ; set interrupt service 
mov [di+4*TMRINT],ax 


MOV ax,Cs 

mov [di+4*TMRINT+2],ax 

sti ; interrupts on 
pop ds * restore ds 

call tmr_eni ; enable interrupts 
ret ; return 


tmr int endp 


comment ~ 
ime. clt reset time base generation 


tmr_cir() 


The time base adjustment variables are reset. This function is to be called by 
td__set when the time of day is initially set from a continuous clock. Nothing 
is returned. 


tmr__clr proc near 
XOX ax,ax ; zero time base generation variables 
mov tmr_idv0,al 
mov tmr_ idvi,al 
mov tmr idv2,al 
ret r ; return 
tmr clr endp 


comment ~ 
tmr rst reset timer 


tmr__rst() 


The original interrupt service routine is restored and the hardware clock is 
reprogrammed. However, the original hardware values are not available in this 
edition. Therefore the original system state cannot always be restored. 


tmr_ rst proc near 
mov tmr_ilck,OFFh ; lock out interrupt service 


push ds ; protect ds 

XOX ax,ax ; restore original interrupt vector 
mov ds,ax 

mov di,ax 

call tmr_dsi ; disable timer interrupt 

cli ; interrupts off 


mov ax, [di+4*RLCINT] 
mov [di+4*TMRINT],ax 
mov ax, [dit+t4*RLCINT+2) 
mov (di+4*TMRINT+2],ax 


pop ds * restore ds 

xor bx,bx ; restart hardware timer 
call tmr_ str 

sti ; interrupts on 

call tmr_eni ; enable timer interrupt 
ret ; return 


tmr_ rst endp 


comment ~ e 
tmr__tmr restart hardware timer 


tmr__tmr\\ 


Channel 0 of an 8253 timer is initialized to mode 3. The count in bx is then 
programmed. 


tmr__tmr proc near ; restart timer 
mov bx,tmr_dvsr ; set tele system tick period 
tmr__str proc near ; set timer period 
mov al,20 * reset 8253 (mode 0, count >= 8,192) 
out TMRPRT+3,al ; [> 6.8 msec] 
jowait 
out TMRPRT,al 
mov al,36h ; initialize 8253 (mode 3, both bytes) 
iowait 
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out TMRPRT+3,al 
mov al,bl 
jowait 

out TMRPRT,al 
mov al,bh 
jowait 

out TMRPRT,al 
ret 

endp 

endp 


tmr__ str 
tmr__tmr 


comment ~ 
tmr__sts 


tmr__sts() 


The returned value is the 


tmr__sts proc near 
mov al,00h 
out TMRPRT+3,al 
nop 
in al, TMRPRT 
mov ah,al 
in al, TMRPRT 
xchg ah,al 
ret 
tmr sts endp 
comment ~ 
tmr__dsi 


tmr__dsi() 


; return 


read timer status 


current count in the timer. 
: read timer status 
: set read mode 


: allow timer chip to recover 
; read count 


: return 


disable interrupt 


The timer interrupt is disabled at the 8259 interrupt controller. 


tmr__dsi proc near 


cli 


in al, INTPRT+1 ; 


or al, TMRMSK 
jowait 


; interrupts off 
disable timer interrupt 


out INTPRT+1,al 


sti 

ret 
tmr__dsi endp 
comment ~ 
tmr__eni 


tmr__eni() 


; interrupts on 
; return 


enable interrupt 


The timer interrupt is enabled at the 8259 interrupt controller. 


tmr__eni proc near 


; interrupts off 
; enable timer interrupt 


; interrupts on 
5° return 


read real time clock 


cli 
in al, INTPRT+1; 
and al,not TMRMSK 
dowait 
out INTPRT+1,al 
sti 
ret 

tmr__eni  endp 

comment ~ 

t_rdclk 

t_rdclk() 


The current value of the 


DMAREG equ 0 
t rdclk 


proc near 
rdclk0: 


mov dx,DMAREG 
call t__rdclk 
mov bx, ax 
call t_rdclk 
emp ah, bh 

jne rdclk0 
ret 

t_rdclk endp 
t rdclk proc near 
cli 

in al,dx 
mov ah,al 
jowait 

in al,dx 
xchg al,ah 
sti 

ret 
t__rdclk endp 
comment ~ 
t_rtmark 


t_rtmark (np) 
pointer *np; 


real time clock is read and returned. 


: refresh address DMA register 


; set DMA register address 
; read time 

; store time 

; read time again 

; test for interruption 


; return 


; interrupts off 
; read time 


; interrupts on 
; return 


mark execution interval 


The number of refreshes since the last call to t_rtmark is accumulated. Then 
the reference count is reset. np points to the area that will accumulate the 


number of refreshes to the next call. The returned value is the original 


accumulator pointer. 


t_rtmark proc near 
push bp 
mov bp, sp 


* protect bp 
* establish parameter addressability 


(continued on page 80) 
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MOSIN — 
ULI SIR 


MENU BUILDER 
is acomplete 
menu generation 
system written 
in C code. 


Menus may be created or 
modified via a high-level menu 
definition language. 


Features include: 


1D) ynamically created menus 


Source code provided 


Bull screen interface 


Mf uiti-leve! help processing 


Source code structured to 
facilitate modification and 
enhancement 


MENU BUILDER is perfect for 
the application or system devel- 
oper who requires a menu-driven 
user interface. 


This package is an outstanding 
value and an essential addition 
to the toolkit of any organization. 


Unique user environments are 
crafted in a fraction of the time 
and at a fraction of the cost of 
other alternatives. 


Diskette $ 295.00 


Cartridge Tape... .$ 895.00 


9 Track Tape $1,095.00 





Call SOFTWARE SYSTEMS 
ASSOCIATES for ordering 
information— 


312/620-4677 


Circle no. 326 on reader service card. 
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SOFTSTRIP” 


NOW OFFERS YOU SOMETHING 


NEVE 


CONVENTIONAL DATA HANDLING 






a4 
Nv lA 
1) 


- 
ey 





te 


4 

ao 

A 
i 


Neen 
‘ 
- | 
Svs ela 
ate ~ 
a 
- 
s- 


‘ / Er. 
{{i---- 
\y 
ag 
to 
Ww Se 
(Hii 
nS 
| ay | Vee >= 

| 
ig 
e 


¥ / 
Ba 5 ace as cg eee. Fk lg eras ee 


THE SOFTSTRIP SYSTEM 


A CHOICE. 


Until now you were stuck with disks. 

No more. Install our unique STRIPPER™ software 
on your personal computer today and discover the 
many benefits of the fastest, easiest, least expensive 
way to handle information. 

STRIPPER lets you print— ON PAPER — your own 
machine readable Softstrip data strips using your dot 
matrix printer. The Softstrip System Reader reads that 
information into a computer rapidly. With STRIPPER 
and the reader, your PC and printer become part of 
the most versatile information handling system 
available. 

With this system you can do anything you wish with 
any data you have in your PC — ON PAPER. 


DATA ENTRY: Why use keystrokes when you can 
eliminate them with data strips? Whatever the 
document - invoices, packing slips, memos, letters, 
sales reports, the list is endless — simply print adata 
strip right on the same printed page. Now you have 
a document that is both human readable and machine 
readable. A typical document can be entered in only 
15 seconds using data strips. And, it ends keystroke 
errors forever. 


DATA DISTRIBUTION: Why copy disks? It’s time 
consuming and expensive. Softstrip data strips will 
end all that. Simply photocopy as many data strips as 
you like and send them by mail. Data strips ignore 
folding, coffee stains, ink marks and, by the way, 


magnetic fields. And if you’re using telecommunica- 
tions, you can stop making the phone company rich. 


DATA STORAGE AND RETRIEVAL: Why have a 
file of disks and a file of paper? Eliminate one with 
Softstrip data strips. File the data strip with the docu- 
ment. Better still, print the strip right on the document. 
Then put it in a file or binder. 

Retrieval is simple. To find existing data, pull the 
document and its related data strip from the file. 
They've been stored together. Then use the reader 
to enter the data. No more hassle trying to match 
documents with the right disk — if you can find it. 


DATA TRANSFER: Why bother with cables, 
modems and phone lines to move files between 
computers? A Softstrip data strip generated by an 
IBM PC can be read into another PC, or compatible, 
an Apple or even a Macintosh. If you work at home 
on a Macintosh, make a data strip on your printer, 
take it into the office and read it into your IBM PC. 
Simple. And we’ve created the utilities to let you do 
that easily. (See Application Notes on opposite page.) 


Fascinating, isn’t it? Anything you can do with disks 
can be done with the Softstrip data strip system — 
faster, easier and at lower cost — ON PAPER. 


All you need is STRIPPER software at $19.95 and 
the Softstrip System Reader at $199.95. 










Pe icain 


COMPUTER READABLE PRINT 


NOW! TRANSFER DATA — 
PROGRAM TO PROGRAM WITH 
SOFTSTRIP”. 


Now you can move data between programs quickly and easily using 
SOFTSTRIP data strips. 


Using the Softstrip System, you can move data between computers and 
such programs as WordStar and MacWrite, dBASE and AppleWorks, 
Lotus 1-2-3 and Excel and ReadySetGo and many others. 





We've created a series of several dozen Application Notes on Softstrip data 
strips. These lead you through simple steps to make the file transfer as 
easy as possible, adding even more versatility to your personal computer 
when you purchase the SOFTSTRIP SYSTEM. The advanced system you've 
been hearing so much about. 


All you need to move data between programs is STRIPPER™ software at 
$19.95 and the Softstrip System Reader at $199.95. 


For acomplete list of Application Notes, contact your dealer or call Cauzin. 
























A small manufacturer solved a knotty internal 
=>) communications problem using the SOFTSTRIP 





——— The manufacturer uses personal computers in 
various departments. The problem was that most 
were not linked with others, and that different, incompatible 
computer makes were in use; predominantly IBM PC’s and Apple 
Macintoshes. 


Because of compatible media, virtually all internal communication 
was in hardcopy form. It was necessary for document recipients to 
key in the information if it was to be used in the local computer. 
Data included sales statistics, engineering reports, and sales 
materials. Especially time-consuming was the rekeying of brochure 
and sell-sheet drafts created on IBM PC’s with wordprocessors, but 
later edited and composed with Pagemaker and the Macintosh and 
Laserwriter. 


By equipping all computers with the SOFTSTRIP SYSTEM READER 
and STRIPPER, each station can now reduce all reports to data strip 
form. These are photocopied and sent to appropriate departments 
for reentry through the SOFTSTRIP READER. Using Cauzin’'s Softstrip 
System and Application Notes, the problem of moving information 
between dissimilar computers and programs was solved. 


Users’ Groups: Call for Special User Group Discounts. 


ACT NOW! Don’t delay. See your local Softstrip dealer or call us at 
1-800-533-7323. In Connecticut: 203-573-0150. 


For Europe and Asia Contact: 


CAUZIN Softstrip International, Ltd. 

835 South Main Street 53 Bedford Square 

Waterbury, CT 06706 London, WC1 B3DP England 

(203) 573-0150 01-631-3775 Telex: 263874SOFTST G 
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This data strip contains 
IBM2MAC, a utility that 
runs on the IBM and 
converts an IBM file to 
Macintosh format. 





DeSmet C 


— now with — 
LARGE MEMORY 







Css C Compiler’$109 


Full K&R + V7 extensions 
Inline asm 

Assembler, linker, librarian 
Full screen editor (SEE!) 
8087 & S/W floating point 








C88 with 
D88 Debugger 


Set Breakpoints by line number 
or function name 

Examine Global/Local variables 
by name 

Show C source while debugging 

Both D88 and User displays 





$159 













Large Memory $209 


C Compiler 
32-Bit Pointers (Full Megabyte 
Addressing) 

Fast Access of Static Data 

Includes D88 Debugger 









“Both D88 & Large Memory 
available as options at $50 each. 
We also have a C compiler for the 
Mac. $150. Call for details. 







— plus — 





Graphics $35 


BASICA-like (+src) 








Hacker $25 
Source for start-up, 
RAM.COM & more 
Make $50 
Full UNIX-level 






$35 


Tools (+source) 








XARRAY 
Large Arrays (+source) 


C WARE 


CORPORATION 
P.O. Box C 
SUNNYVALE, CA 94087 USA 
(408) 720-9696 TELEX: 358185 
Street Address: 505 W. Olive, #767 
VISA, MC & AMEX accepted 


$39 
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Listing Four (Listing continued, text begins on page 16.) 


call tmr dsi ; disable timer interrupt 
call t_rdclk =; read real time clock 
mov bx, ax : protect current count 
xchg bx,t_rtrfct ; update reference count 


sub ax,bx ; compute execution interval 
jnc markl ; test for no overflow 
neg ax ; adjust count 

markl: mov bx,t_rtactg ; accumulate execution time 


add ax, (bx) 
mov [bx],ax 
jnc markxit 
add word ptr [bx+2],1 
ne markxit 
ne word ptr [bx+4] 
markxit: mov ax,bx ; return orginal pointer 
mov bx, [bp].t_np0 ; set new accumulator pointer 
mov t_rtactg, bx 


call tmr_eni ; enable timer interrupt 


pop bp ; restore bp 
ret ; return 
t_rtmark endp 
comment ~ 
w__cdspl display physical buffer 


w__cdspl (pw) 
struct w phys *pw; 


Physical window pw is displayed. 
clock interrupt service function. 


~ 


This function is called by the system tick 
Nothing is returned. 


w__cdspl proc near 


ret ; return 
w_cdspl endp 
comment ~ 
w sync synchronize interrupt to display 
Ww sync() 


The system tick clock timer is adjusted so that w_dsply executes just prior 
to the vertical blanking interval. Nothing is returned. 


w osync proc near 
call tmr_tmr ; start timer 
w_ sync’ endp 
comment ~ 
td__set set time of day clock 
td__set() 


The clock is set to the current time. Nothing is returned. 


td__set proc near 

ret ; return 
td_ set endp 
comment ~ 
td__upd update clock 
td__upd() 


The clock is updated based on the number of ticks since it was last updated. 
The normal return (ax) is F. _E is returned if the call was locked out. 


td__upd proc near 

ret ; return 
td__upd endp 

endps 

end 


End Listings 
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SAS Institute Inc. 
Announces 


Lattice C Compilers for Your IBM Mainframe 


Two years ago... 

SAS Institute launched an effort to develop a 
subset of the SAS® Software System for the 
IBM Personal Computer. After careful study, 
we agreed that C was the programming 
language of choice. And that the 

Lattice® C compiler offered the quality, 
speed, and efficiency we needed. 


One year ago... 

Development had progressed so well that we 
expanded our efforts to include the entire 
SAS System on a PC, written in C. And to 
insure that the language, syntax, and 
commands would be identical across all 
operating systems, we decided that all future 
versions of the SAS System —regardless of 
hardware—would be derived from the same 
source code written in C. That meant that 
we needed a C compiler for IBM 370 main- 
frames. And it had to be good, since all our 
software products would depend on it. 

So we approached Lattice, Inc. and asked 
if we could implement a version of the 
Lattice C compiler for IBM mainframes. 
With Lattice, Inc.’s agreement, development 
began and progressed rapidly. 


Today... 
Our efforts are complete—we have a first- 
rate IBM 370 C compiler. And we are 
pleased to offer this development tool to 
you. Now you can write in a single 
language that is source code compatible with 
your IBM mainframe and your IBM PC. We 
have faithfully implemented not only the 
language, but also the supporting library and 
environment. 

Features of the Lattice C compiler for 
the 370 include: 


@ Generation of reentrant object code. 
Reentrancy allows many users to share 
the same code. Reentrancy is not an 
easy feature to achieve on the 370, 
especially if you use non-constant 
external variables, but we did it. 

@ Optimization of the generated code. We 
know the 370 instruction set and the 
various 370 operating environments. We 
have over 100 staff years of assembler 
language systems experience on our 
development team. 

@ Generated code executable in both 
24-bit and 31-bit addressing modes. You 
can run compiled programs above the 
16 megabyte line in MVS/XA. 

@ Generated code identical for OS and 
CMS operating systems. You can move 
modules between MVS and CMS 
without even recompiling. 

@ Complete libraries. We have 
implemented all the library routines 
described by Kernighan and Ritchie (the 
informal C standard), and all the library 


routines supported by Lattice (except 
operating system dependent routines), 
plus extensions for dealing with 370 
operating environments directly. 
Especially significant is our 
byte-addressable Unix®-style I/O 
access method. 

@ Built-in functions. Many of the 
traditional string handling functions are 
available as built-in functions, generating 
in-line machine code rather than function 
calls. Your call to move a string can result 
in just one MVC instruction rather than a 
function call and a loop. 


In addition to mainframe software 
development, you can also use our new 
cross-compiler to develop PC software on 
your IBM mainframe. With our cross- 
compiler, you can compile Lattice C 
programs on your mainframe and generate 
object code ready to download to your PC. 

With the cross-compiler, we also offer 
PLINK86™ and PLIB86™ by Phoenix 
Software Associates Ltd. The Phoenix link- 
editor and library management facility can 
bind several compiled programs on the 
mainframe and download immediately 
executable modules to your PC. 


Tomorrow... 

We believe that the C language offers the 
SAS System the path to true portability and 
maintainability. And we believe that other 
companies will make similar strategic 
decisions about C. Already, C is taught in 
most college computer science curriculums, 
and is replacing older languages in many. 
And almost every computer introduced to 
the market now has a C compiler. 


i want to learn more about: 


C, the language of 
choice... 


C supports structured programming with 
superior control features for conditionals, 
iteration, and case selection. C is good for 
data structures, with its elegant implemen- 
tation of structures and pointers. C is 
conducive to portable coding. It is simple 
to adjust for the size differences of data 
elements on different machines. 


Continuous support... 

At SAS Institute, we support all our 
products. You license them annually; we 
support them continuously. You get updates 
at no additional charge. We have a 
continuing commitment to make our 
compiler better and better. We have the 
ultimate incentive—all our software 
products depend on it. 


For more information... 
Complete and mail the coupon today. 
Because we've got the development tool for 
your tomorrow. 


® 


SAS Institute Inc. 

SAS Circle, Box 8000 

Cary, NC 27511-8000 

Telephone (919) 467-8000 x 7000 


1 the C compiler for MVS software developers 
0 the C compiler for CMS software developers 
0 the cross-compiler with PLINK86 and PLIB86 


today...so I’ll be ready for tomorrow. 


Please complete or attach your business card. 


Name 
Title 
Company 
Address 
City 
Telephone 

















Mail to: SAS Institute Inc., Attn: CC, SAS Circle, Box 8000, Cary, NC, USA. 


27511-8000. Telephone (919) 467-8000, x 7000 


DDJ 12/86 
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| 
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| 

| 
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SAS is the registered trademark of SAS Institute Inc., Cary, NC, USA. Lattice is the registered trademark of Lattice, Inc. PLINK86 and PLIB86 are trademarks of Phoenix Software Associates Ltd. 
UNIX is the trademark of AT&T. Copyright © 1985 by SAS Institute Inc. Printed in the USA. 
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Cursor and 
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keys. 















for the 10 million PC users IBM just ignored! 


IBM just announced their new 
redesigned ‘‘standard”’ keyboard for per- 
sonal computers. There's only one problem: 
it won't work on your IBM computer if it 
was purchased prior to June 1986 or on any 
PC compatible purchased at any time! 


Not to worry. Our new Turbo-101 Enhanced 
Keyboard gives you the layout and en- 
hancements of the IBM with some logical 
improvements (see above photo). And it 
works on your existing PC, XT, AT, PCjr, 
AT&T, Epson and virtually all compatibles! 


Get Borland’s Turbo Lightning 
For FREE! 

To really turbocharge 
your productivity, we are 
including, free-of-charge, 
Borlana’s red-hot Turbo 
Lightning software with 
each keyboard. Now, 
when using SideKick, WordPerfect, Micro- 
soft Word, 1-2-3 or most popular programs, 
our Turbo-101 Keyboard will check your 
spelling as you type, gives you instant 
access to Random House’s 80,000-word 
Concise Dictionary and 60,000-word 
Thesaurus and much, much more! 





“Lightning’s good enough to make 
programmers and users cheer, executives 
of other software companies weep,” says 
Jim Seymour of PC Week. Sold separately, 
Turbo Lightning retails for $99.95! 





tN oT EON: Att Se af 


7650 Haskell Avenue 
Van Nuys, California 91406 (818) 780-1673 


Turbo-101 is a trademark of DataDesk International. Turbo Lightning is a 
trademark of Borland International. IBM and IBM AT are registered trade- 
marks of International Business Machines, Inc. 


Circle no. 329 on reader service card. 
Circle no. 330 on reader service card. 


The Turbo-101 is the best data entry tool 
since the pencil! 

For users of spreadsheets like 1-2-3, the 
Turbo-101’s separate cursor controls and 
numeric keypad makes entering numeric 
data into cells and moving from cell to cell 
as natural as moving your fingers. And for 
word-processing, the ‘Selectric’ typewriter 
layout makes the Turbo-101 as easy to 
use as a pencil; and with the extra large 
Enter, Shift & Control Keys, you’ll make so 
few mistakes, you won't even need an 
eraser! 


SPECIAL OFFER! 


ONLY $149.95* FOR BOTH 

KEYBOARD & SOFTWARE 
includes 30-day money back 
guarantee and 2 year full warranty. 
To prove that we don’t ignore you 
or your pocketbook, you get our 
Turbo-101 Enhanced Keyboard and 
Borland’s Turbo Lightning for an 
astounding $149.95.* No, you didn’t 
read it wrong. During this amazing 
Introductory Offer you get both 
keyboard and software for less 
than most software programs 
by themselves! Now, if you’re 
still feeling ignored, you can 
always do what you-know-who 
wants you to do...and buy 
anew computer to get their 
keyboard! 


credit card orders call 


(800) 826-5398 


in CA call 
(800) 592-9602 


*Price does not include adaptor 
cables required by certain compat- 
ibles ¢ A Limited offer—price subject 
to change without notification. 


4 
ane. 
a 


Up to now, DataDesk International may be one of 
the best kept secrets, but here’s what’s being said 
about our first end-user Keyboard/Borland 


software bundle: 


“Who Can Pass Up a Deal? 
Department. Talk about an 
aggressive product!” 
Jobn C. Dvorak, 

InfoWorld Mar 86 


“It solves all of the problems 
exhibited by their regular 
PC/XT keyboard...it’s a 
great bargain!”’ 

PC Productivity Digest 

May 86 


“DataDesk Intl. bas designed 
a sturdy and handsome key- 
board that bas tactile re- 
sponse...is the hardware 
bargain of the year”’ says 
Charles Humble, Oregonian 
Jan 86 


“The best part of the key- 
board is the way it feels. It’s 
ideal! And fast. I’ve never 
worked on a keyboard with 
a nicer touch.” 

Business Computer Digest 
Aug 86 


“It's a good keyboard. Good 
feel: the keys bave tactile 
feedback. No musb at all. 

This is about as good a key- 
board deal as you're likely 
to find... bave absolutely no 
besitation in recommend- 
ing the Model PC8700.”’ 
Jerry Pournelle, 

Byte Magazine Sept. 86 


“This keyboard is neat to 
type on and feels solid. It 
has tactile feedback keys...I 
can type much faster on it.”’ 
Test Drive Scorecard: 
DataDesk-10 Key Tronics-9 
Teleconnect Magazine 

May 86 
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Systems contain the listing 
for Richard Rodman’s 32000 
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7 Ways to Increase Productivity 


Add Multi-User Windowing to Your Software 
Multi-Windows 


Multi-Windows from Cytek is the complete library for creating single or 
multi-user windowed applications under the Multi-C environment. 

Simple function calls give you full access to as many as 255 windows per 
display. Dynamically create, delete, size, and move windows as well as 
specify parameters such as border types, attributes, and scroll modes on a 
window-by-window basis. 

Multi-Windows also includes a comprehensive display management li- 
brary with all of the field, screen, input checking, and context-sensitive help 
functions you need to quickly build interactive, multi-user programs. 

Designed for easy, trouble-free operation with virtually all microcomput- 
ers, you can use Multi- Windows in a wide variety of applications from busi- 
ness software to industrial control. 

Multi-C lets you create, manage, and communicate among tasks with little 
RAM and little processor overhead. It’s designed for ease of use in produc- 
tion programming, and Multi-C cooperates with your operating system, so 
functions are reliable. It’s portable (written in C); use it for stand-alone sys- 
tems or make it the kernel of your own operating system. 

All Multi-Windows hardware dependent modules are supplied in source 
form (primarily inC). No royalties. MS C, Lattice 2.15 or 3.0, C86. 

Multi-Windows with Multi-C MSDOS $444 
Circle no. 301 on reader service card. Multi-C Only MSDOS $149 


NEW Blaise Tools Are Better Than Ever 
C Tools Plus 


Free yourself for more creative programming; stop worrying about hard- 
ware dependence. Handle everything from co-resident software require- 
ments to multiple display pages and monitors with C Tools Plus. Filter 
interrupts so that other resident programs still work. 200+ well- 
documented functions control screen handling (direct to video adapter or 
BIOS calls, EGA text mode support including 43 line and multiple display 
_ pages — even handle multiple monitors), an unlimited number of pop-up, 
stackable windows with word-wrap, interrupt service routines, DOS di- 
_ rectory and file handling, memory management and program control, 

_ String functions, and more. Source, no royalties. Lattice 3.0, MS C. 
_ Circle no. 304 on reader service card. PCDOS $149 


BLAISE COMPUTING INC. 


Fast Source Debugger/Interpreter 
Plus 100% Compiler Compatibility 
Interactive C™ 


Full K&R standard interpreter with integrated full-screen editor and source 
debugger speeds execute-edit-resume cycle and features 100% compati- 
bility with Lattice and Microsoft compilers (even header files). Link in 
external libraries; no source code modifications are necessary. 

Why get only a limited debugger when you can get full source debugging 
with an interactive interpreter? Unlimited breakpoints, variety of stepping 
modes, direct execution mode (evaluate expressions, modify variables, 
invoke functions), run-time error reporting by line and column, continue 
from error without re-executing from start. 8087/287 support, and even 
allows display of program and chipset output on separate monitors. 
Lattice 2.x and 3.0, Microsoft 3.0 and 4.0. PCDOS $225 

Circle no. 305 on reader service card. 





HOURS 
8:30 AM - 8:00 PMEST. 










MacStyle Your C Programs Use Mac’s Friendly Interface 
with C Extender 


Invention Software has written a powerful library that lets novices and 
professional developers alike access the Mac interface with over 85 flexible — 
functions to extend, access, and integrate with the “Toolbox.” 

High and low level functions create windows, scroll bars, dialog boxes, 
menus, provide mouse support, and perform graphics printing with single 
function calls. NEW version 2.00 features ZOOM windows, marquis to 
copy screen image, double-click detect, search and replace multi-page 
printing, improved text-editing, save and recall MacPaint bit map, “‘bug 
alert,” modeless dialog support, and generic I/O routines. Compact code, » 
partial source tutorial provided, no royalties. Aztec, Megamax, Consulair, 
Lightspeed. Circle no. 302 on reader service card. MAC $119 


Quickly Prototype User Interface and Incorporate Screens 

with Skylights 

Use Skylights to quickly design interactive prototypes, then include 
screens you develop in your finished application code; design demos or 
tutorials; even use with other languages (BASIC, Pascal, Assembly) 
through related DOS-resident interface utility. 

Skylights combines an intuitive screen/window/menu editor, run-time 
windowing, menu handling, and front-end support routines, and “Demo/ 
Tutorial Maker” program plus detailed low-level primitives. Supports a 
variety of pointing devices (mice, tablets, lightpens) and allows more 
than one to be active at a time. Support for Lattice, Microsoft, Datalight, 
CI C86, MWC, Desmet, Aztec, and Wizard. Bit-mapped oe hics upgrade 
available. No royalties. Skylight CDOS $359 
Circle no. 303 on reader service card. Software, Inc. 


Flexible Screen 
Development with 
SECURITY CHECKING 
and HELP SCREENS: 
ZVIEW Screen Library 


Use this field-sensitive tool to 
develop data entry screens and win- 
dows and provide run-time flexibil- 
ity. Security level settings restrict 
inquiry or update of fields; multiple 
screen help display is available at 
screen and field level. You can also 
customize ZVIEW’s operation and 
make any field characteristic change 
during execution. 

ZVIEW gives you full control of 
attributes, colors, boxes, protected 
fields, scrolling, and more. Load 
screens from memory for fast re- 
sponse. Field support includes alpha, 
numeric, or alphanumeric data types, 
Case conversion, range checking, 
and field comparison, and ZVIEW 
provides automatic data conversion 
to and from ASCII screen format. 
For Microsoft C, Lattice 3.0, and 
Aztec 3.2e. Supports EGA, color, 
and monochrome displays. 


Circle no. 306 PCDOS $219 


Call for a catalog, literature, advice and service you can trust 


800-421-8006 


THE PROGRAMMER’S SHOP™ 
128-L Rockland Street, Hanover, MA 02339 
Mass: 800-442-8070 or 617-826-7531 8/86 


“IT would like to mention that I appreciate the way 
that the Programmer’s Shop does business. It is 
indeed refreshing to be able to call and get answers 
that you can trust in, to questions on various 
products.” 


C DYNAMO! 
WINDOWING: Full C 
Source, No Royalties 
POWER WINDOWS AND 
C FUNCTION LIBRARY 


Power Windows covers all the 
bases: overlays, borders, 1-2-3 style 
or pop-up menus/help windows, zap 
instantly on/off screen, status lines, 
horizontal/vertical scrolling, color 
control or highlighting, word-wrap, 
files to windows, keyboard to win- 
dows. Powerful, easy to use, inte- 
grated error messages, thorough 
documentation. Supports IBM 
monochrome or color. 

MSDOS Only $119 
C Function Library - includes 325 funda- 


mental functions with readable source 
and thorough documentation. 


MSDOS Only $119 


No matter what you have, you need these. 
Best value available. Highly 
Circle no. 337 


Entcickon 


recommended! 






Donald E. Winters 
MIS Software Development Inc. 
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16-BIT 
IQCLISP Listing One (Text begins on page 104.) 


; General string comparison routine for 8086 
7 by Ray Duncan, June,1986 


; Call with: S SI = address of stringl 





More Common Lisp features in less space ; Dx length of string! 
; : = address of strin 
for less money than any other IBM-PC lisp. ; mc. = LengeW of wexinag 
; Returns: Z and S flags set appropriately: 
Ri MSDOS portable = = True if strings are equal 
‘ ; Zz = False if strings are not equal, and 
Bm Bignutns, SUS! Suppor! | Borate Se coin a necine 


@ Multidimensional arrays 


‘ cx, bx : t length t 
@ Full Common Lisp package system emp xs bx > use shorter of two lengths 
@ Full set of control primitives. ent: rere cmos ; now compare strings 
? , Str s ai so tar 
@ Keyword parameters, macros ae >: keturn, strings not equal, Z-False 
samp2: s X, DX ? compare original string lengths 
@ Save/restore full environments for speed sl wie re fe SF See cae See 


m@ STEP, TRACE, BREAK, DEBUG, ADVISE, End Listing One 


APROPOS Listing Two 
@ Roll-out frees space for invoking MSDOS 


Listing Two 
commands 


; General string comparison routine for 68000 
7 by Rick Wilton, June 1986 


IOCLISP PACKAGE $300. alee = weno ce 


= length of stringl 
i.s  stranp3 branch if string length=0 
stranp2 anpm.b = (a0)+, (al)+ ? compare strings 
dbne d2,stremp2 
bne.s  stranp4 : branch if strings unequal 
strcmp3 do, dl 


Al = address of string2 





; Di = length of string2 
; Returns: D3 = flag (-1,0,1) 
Ja Integral Quality | |: yams come 
; 1 if stringl > string2 
P.O. Box 31970 
str ; set d2 = shorter length 
Seattle, Washington 98103 SEND pove.b di, d2 ; 42 t= length? 


cmp.b d0,dl 


(206) 527- 2918 blt.s strompl ; branch if length2 < lengthl 


move.b d0,d2 ; d2 := lengthl 


. 








se 


cnp.b 

bne.s stromp4 ? branch if lengths unequal 
moveq #0,d3 ; stringl = string2, return 0 
rts 


Now with a compiler. 


stranp4 bmi.s  stranp5 branch if dl < d0 
moveq #-1,d3 3; stringl < string2, return -1 
rts 





Fe | Compiler comes with SOUICE stramp5 moveq #1,d3 ; stringl > string2, return 1 
@ Compiler cuts execution time 50-75%, 18 


program size 60-80% ine 
@ Multidimensional arrays Listing Three 
Listing Three 


S Floating point, bignums, 808/ support Title EXEC program using undocumented MS-DOS Interrupt 2EH 


= Macros This little demonstration program illustrates the undocumented 
x Color graphics 3 MS-DOS Int 2EH route to the cammand interpreter in COMMAND.CCM. 

In this example we just pass the cammand tail of the line that 
loaded the EXEC2E program. 


End Listing Two 


Se Se 


@ Multiple display windows 
mw Assembly language interface 
@ Available for IBM PC or TI-PRO 


by David Gwillim - 20 June 1986 
Appears to work on all current versions of MS-DOS (2.x-3.1) 
Adapted from Turbo Pascal program written by Russ Nelson, Potsdam, NY. 


Se Se Se Se Fe Fe Fe 





cseg segment 
org 100H 
IOQLISP PACKAGE $270. assume cs:cseg,ds:nothing : force assembler to provide 
; CS overrides in the right places 
INCLUDES COMPILER facts SS seat 
20 dup ('STACK ') 
stack equ $ 
@ VISA and Mastercard accepted ieee a ‘ 5 eg uel 
e _~«pt dw 0 : e SP ist 
@ Generous update policy 3 DE per hme 
msgl db ‘Beginning DOS Int 2Eh Exec',13,10,'$' 


@ Attractive educational license 
(continued on page 88 ) 
Circle no. 327 on reader service card. 
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Ta ce oe OL: FILE: VEDPLUS.TXT INSERT 


WINDOW 1 


VEDIT PLUS is an advanced editor that bidlist ( infile ) 

makes your program development and FILE *infile; 

word processing as efficient and ; 

easy as possible. VEDIT PLUS is register i; 

simple enough to learn and use for struct node “ptr; 

the novice, fget has the speed, 

flexibility and power to satisfy the ola tEOMERe (igual lupe ees 


most demanding computer professional. ptr = malloc ( Nears BE 


VEDIT PLUS is particularly suited for teen 

writing all types of programs and head = tail = ptr: 
lengthy documents such as reports or roa tom 

manuscripts. tail -)next=ptr; 


eT] eso) aae 
This shows how VEDIT PLUS can perform é 
windowing. One window is used for tail-)next = NULL: 


word processing, a second for program load _str( &(tail-) header), 


development, and the third for , 
commands. return ( termlim | 


WINDOW $ 


VPLUSPC .COM INSTALL .EXE LIHARD- .BAT T 

LIGHT .COM .COM LONG -NUM_ DISK 
VEDIT INI .DIC KEYS BM THES 
LIGHT -HLP .DIC PRINT -EXC INSTALL 


VEDIT PLUS has been the#1 choice of professionals 
since 1980. Our latest release is even better - you can 
open windows to simultaneously edit several files, ac- 
cess many editing functions with pop-up menus, use 
keystroke macros to speed editing, and run other pro- 
grams or DOS commands from within VEDIT PLUS. 


Whether your needs are program development, tech- 
nical writing or word processing, VEDIT PLUS is your 
answer. With over 40,000 users you can depend on 
VEDIT PLUS to perform consistently and reliably. It is 
simple enough to learn for the novice, yet has the 
speed, flexibility and power to satisfy the most de- 
manding professional. 


Compare. No other editor is as powerful - unlimited 
keystroke macros, instant ‘off-the-cuff command mac- 
ros utilizing a complete programming language, sin- 
gle command file comparison, special word process- 
ing and programming features. No other editor is as 
easy to use - on-line help, pop-up menus, 75 page 
tutorial, 380 page manual, and VEDIT PLUS is com- 
pletely customizable. 


Fully supports color windows on IBM CGA & EGA, and 
even windows on most CRT terminals (including CRT’s 
connected to an IBM PC). Available for IBM PC, TI 
Professional, Tandy 2000, DEC Rainbow, Wang PC, 
MS-DOS, CP/M-86 and CP/M-80. Order direct or from 
your dealer. $185 


“To sum things up, VEDIT PLUS is a small, fast, 
sophisticated editor with a wealth of features and a 
good macro language. It offers many rewards forthe 
dedicated programmer.” 

Computer Language, Chris Wolf, Scott 

Lewis, Mark Gayman 6/86 


“VEDIT PLUS is a wholly remarkable program: 
blindingly fast, extremely powerful, and highly flex- 
ible.” 

Profiles Magazine, Robert Lavenda 4/86 


VEDIT and CompuView are registered trademarks of CompuView Products, Inc. MS- 


DOS is a registered trademark of Microsoft. CP/M is a registered trademark of Digital 
Research. WordStar is a registered trademark of MicroPro. 


Circle no. 122 on reader service card. 
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VEDIT PLUS FEATURES 





e Simultaneously edit up to 37 files of unlimited size. 

e Split the screen into variable sized windows. 

e ‘Virtual’ disk buffering simplifies editing of large files. 

e Memory management supports up to 640K. 

e Execute DOS commands or other programs. 

e MS-DOS pathname and CP/M user number support. 

e Horizontal scrolling - edit long lines. 

e Flexible ‘cut and paste’ with 36 text registers. 

e Customization - determine your own keyboard layout, create 
your own editing functions, support any screen size, any CRT. 

e Optimized for IBM PC/XT/AT. Also 132 column & up to 70 lines. 


EASY TO USE 


e Interactive on-line help is user changeable and expandable. 
e On-line integer calculator (also algebraic expressions). 

e Single key search and global or selective replace. 

e Pop-up menus for easy access to many editing functions. 

e Keystroke macros speed editing, ‘hot keys’ for menu functions. 


FOR PROGRAMMERS 


e Automatic Indent/Undent for ‘C’, PL/I or PASCAL. 

e Match/check nested parentheses, i.e. ‘{’ and ‘}’ for ‘C’. 

e Automatic conversion to upper case for assembly language 
labels, opcodes, operands with comments unchanged. 

e Optional 8080 to 8086 source code translator. 


FOR WRITERS 


e Word Wrap and paragraph formatting at adjustable margins. 
e Right margin justification. 

e Support foreign, graphic and special characters. 

e Convert WordStar and mainframe files. 

e Print any portion of file; separate printer margins. 


MACRO PROGRAMMING LANGUAGE 


e ‘lf-then-else’, looping, testing, branching, user prompts key- 
board input, 17 bit algebraic expressions, variables. 

e CRT emulation within windows, Forms entry. 

e Simplifies complex text processing, formatting, conversions 
and translations. 

e Complete TECO capability. 

e Free macros: e Full screen file compare/merge e Sort mailing 

lists e Print Formatter e Main menu 


CompuView 


1955 Pauline Blvd., Ann Arbor, MI 48103 (313) 996-1299, TELEX 701821 


Relocating Macro 
Assemblers 


e Z80 e NSC800 © 8085 © HD64180 


What is your turnaround 
time? Eliminate this 
dilemma with the fastest 
most powerful assemblers \ 
on the market. 


@ 32 significant chars. on 
externals 

@ math on externals 

e T-states in listing 

® local labels 

e full drive/user 
support 





© M80 Macros” 

e M80 Pseudo-ops 

e tables overflow to disk 
@ recommend JR over JP 

Requires: Z80 W/40 K TPA, 


zowsoxter TB IOS 
___%s LR_Systems 


1622 N. Main St., Butler, PA 16001 
(800) 833-3061 (412) 282-0864 


Circle no. 78 on reader service card. 


Symbolic Debugger 
for 
Turbo Pascal 


For PC-DOS and MS-DOS computers. 

*Examine and modify variables during program 
execution. 

eSet breakpoints at procedures, functions 
and labels by name. 

¢Variables are displayed according to their 
declared types. 

¢View Pascal source on the screen or send it 
to the printer while your program is running. 

*Line-by-line single step. 

*Debug window allows debugging of programs 
without interfering with screen output. 

*Much more, including machine-level debugging 
features. 


Suggested retail price: $59 


Our mail order price: $49 


plus Shipping and Handling: 
$3 US/Canada, $11 elsewhere. 
VISA and MASTERCARD accepted. 
Texas residents please add 6.125% sales tax. 
Unsure? Send $2 for a demonstration disc, refunded upon purchase. 
Kydor Computer Systems 
1701 Greenville Avenue Suite 505 
Richardson, Texas 75081 
(214) 669-1888 


Circle no. 275 on reader service card. 
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Listing Three 


(Listing: continued, text begins on page 104.) 


msg2 


start: 


endcode 


cseg 


db ‘Terminating DOS Int 2Eh Exec',13,10,'$' 

push cs ;make our local data addressable 

pop ds 

MOV dx,offset msgl ;display sign-on message 

mov ah, 9 

int 21h 

mov sp,offset stack sreset SP to our own internal stack 

Mov bx, offset cs:endcode 7Get the offset of the end of our code 

shr bx, 1 ;divide by 16 to get paragraphs 

shr bx, 1 

shr bx, 1 

shr bx,1 

inc bx ;round paragraphs up 

mov ah, 4ah ;shrink down this COM program's 

int 21h zmemory allocation to what's needed 

MOV stkseg,ss ;save our current SS reg 

Mov stkptr,sp ; and SP reg values 

mov si,80h zlet DS:SI point to the command 
zto be executed 

int 2enh zundocumented DOS exec interrupt 
; any error code is now in AX 

mov ss, stkseg ;Restore SS and SP registers 

mov sp, stkptr 

push cs zrestore local addressing 

pop ds 

Mov dx,offset msg2 ;say we're done 

mov ah, 9 

int 21n 

mov ax, 4c00h zexit to DOS 

int 21h 

equ $ 

ends 

end begin 


End Listing Three 


Listing Four 


Listing 
/* 


e/ 


Four 


The following little program can set an environment variable 
whose name is the first command line argument, and whose new 
value is the second command line argument. For example, to 
set environment variable XYZ to a value of HELLO, you would 
run this program using the command SETVAR XYZ HELLO. 


The *PURPOSE* of this piece of code is to illustrate an un- 
documented DOS interrupt entry point (2Eh) that will execute 
*ANY* DOS command *WITHOUT* having to load another copy of 
COMMAND.COM. Not only is it faster, but it is the ONLY way 
to set an environment variable (short of peeking and poking 
around into memory). You *CAN'T* set an environment variable 
with the command exec("“COMMAND.COM”", "/CSETXYZ=HELLO”) because 
when the second copy of COMMAND.COM is loaded, it gets its 
very own environment (a duplicate of the parent's). Although 
the SET command WILL modify that duplicate copy, it won't 
modify the parent's! 


Wnen I said that interrupt 2Eh can be used to execute *ANY* 

DOS command, I meant just that! You can leave off the filename 
extension (as you normally do at the command line), and it will 
perform the normal search for COM, EXE, and BAT files to execute, 
or even execute built-in commands as we've seen above. 


Enjoy! 


Dan Lewis, owner 

Key Software Products 
440 Ninth Avenue 
Menlo Park, CA 94025 
(415) 364-9847 


P.S.- This *IS* an undocumented “feature” of DOS 2.xx. 
NO idea if 3.xx etc support it! 


I have 


#include <stdio.h> 


main(arge, argv) 
int argc ; 
char *argv[] ; 


{ 
Set_Var(argv(1], argv[2]) ; 
} 


Set_Var(variable, value) 
char *variable, *value ; 


{ 
char setbfr[(100] ; 


(continued on page 90 ) 
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Authoritative C Expertise 
from Plum Hall: 

Training, Books, and the 
Plum Hall Validation Suite 


Organizations seeking impartial C 
expertise have turned to Plum Hall 
since 1979. C Workshops, Intro- 
ductory and Advanced, are available 
both in-house and on a regular public 
schedule. Plum Hall textbooks con- 
stitute the most comprehensive in- 
tegrated series on the C Language. 


The new Plum Hall Validation 
Suite is alarge set of C programs for 
testing and evaluating C compilers 
and interpreters. The Suite provides 
compiler writers a cost-effective 
distillation of the validation and testing 
experience of several projects. And 
for the user organization confronting 
important compiler-product selec- 
tions, the Suite is an effective tool for 


detailed feature-by-feature compiler _ 


comparisons. 


The Plum Hall Validation Suite is 
tracking the development of the ANSI 
C Standard, Bach. “shall,” “shall 
not,’’ constraint, and syntax rule of 
the Standard will be tested in the 
Suite. Over 22,000 lines of carefully 
written C, plus over a million bytes of 
Script generated C, provide compre- 
hensive coverage. 


Plum Hall at your service 

For fast next-day shipment of book 
orders, for information about top- 
quality training, and for details about 
the Plum Hall Validation Suite, call 


Joan Hall 
President 

Plum Hall Inc 

| Spruce Avenue 
Cardiff NJ 08232 
609-927-3770 


Circle no. 221 on reader service card. 
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the dBx"™ translator 


daBx produces quality C direct 
from GBASE II or III programs. 


Move dBASE programs to UNIX or other machines. 


Improve program speed and reliability. 


Support multi-user/network applications. 
With power guidebook of conversion hints. 


Includes full screen handler and uses your 
current C database manager. 


May be used to move existing programs or help 
GBASE programmers learn C easily. 


For MSDOS, PCDOS, UNIX, XENIX, Macintosh, AMIGA. 
(Uses ANSI.SYS driver on MSDOS, CURSES under UNIX) 


Priced from $350, also available from distributors. 


dBx is a trademark of Desktop A\i 


41720 Post Road E., Westport, CT 06880 §MCIMAIL « DESKTOPAI 
Phone « 203-255 +3400 Telex * 6502972226MCI 





Circle no. 258 on reader service card. 


TURBO PASCAL GENERATOR 


THE GTP PROFESSIONAL MODEL 


Generate error-free Turbo Pascal source code for: 


DATABASES MENUS 
SCREENS REPORTS 


Build complete, working programs in minutes! 


FEATURES EASY 


Indexed Data Bases 1. Paint-the-screen 

Multiple Screens 2. Define fields & calculations 
Automatic Updating 3. Generate, compile & RUN 

Built-in Edits FLEXIBLE 

Retrieval Facility — 100% Turbo Pascal 

Automatic File Build — Modify in Pascal under Turbo's Editor 
Quick Screen Handling — Extensions are easy with 130 page 
Speedy DB Access Programmer Reference manual 
Context Sensitive HELP 100 documented source code 

Full Keyboard Support routines included 


NOT Copy Protected NO Royalty Fees NO Run-time Library Required 





Requires: IBMPC (100% compatible) 256K RAM 2 Disk Drives 
PC-DOS 2.0+ Turbo Pascal 3.0 from Borland International! 


PRICE $200.00 
CALL FOR QUANTITY DISCOUNTS 
VISA/MC — Check — Money Order — No COD or Purchase Orders 
Texas Residents: add $12.25 Sales Tax 
Outside US & Canada: add $10.00 Air Postage and make payment by 
credit card or money order in U.S. Funds. 


ALLEN, EMERSON & FRANKLIN 


P.O. Box 928 
Katy, TX 77492 
(713) 391-8570 
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| Listing Four 


(Listing continued, text begins on page 104.) 
/* Build the command line: "SET <var>=<value>" */ 
strcpy(setbfr, “SET ") ; 
strcat (setbfr, variable) ; 
strcat(setbfr, "=") ; 
strceat (setbfr, value) ; 


/* Now use INT 2Eh to execute it! */ 


Execute String(setbfr) ; 
} 


/* x6 Oe en ena ea assnabents SSEnennenehab anus anandr ebebendh ener ebaves seetasanas anaes x/ 
/* The really interesting stuff starts here.... */ 
/* ———— pene */ 


Execute String(s) 

char *s; 
{ 
long vec22, vec23, vec24 ; 
long Get Vec(vector) ; 
static char bfr[81]; 


/* Concatenate a carriage return onto end of command line */ 


strepy(bfr + 1,s) ; 
*bfr = strlen(bfr + 1) ; 
strceat (ofr + 1,"\r") ; 


/* preserve cntrl-break, terminate, and critical error vectors */ 
vec22 = Get _Vec(0x22) ; 
vec23 = Get Vec(0x23) ; 
vec24 = Get Vec(0x24) ; 


Release Memory() ; /* necessary! */ 
Exec(bfr) ; /* execute command */ 


/* reset cntrl-break, terminate, and critical error vectors */ 
Set_Vec (0x22, vec22) ; 

Set _Vec (0x23, vec23) ; 

Set _Vec (0x24,vec24) ; 

} 


Exec (s) 
char *s. 3 
{ 


#asm 
7 preserve ds, bp, ss, & sp 


push ds 
push bp 
mov cs:WORD save _ss,ss 
mov cs:WORD save_sp, Sp 


; ds:si ->CR/NULL-terminated command line string 


mov si, [bp+4] 

int 2Eh 

? restore preserved registers 
mov SS,CS:WORD save ss 
mov Sp, CS:WORD save _sp 
pop bp 

pop ds 

tmp Rtn 


Save_ss:dw 
Save_sp:dw 
save _ds:dw 
save_bp:dw 


oo°o°o 


Rtn: 
#end 


Release Memory () 
if (Release()) 
{ 


puts ("Release Memory Failure\n") ; 


exit(l) ; 
} 

} 

Release () 

#asm 
Mov ax,cs 
sub ax, 0010h 
MOV es,ax 
mov bx, ds 
add bx, 1000h 
sub bx, ax 
mov ah, 4Ah 
int 21h 
Mov ax,0 
jnc R_Rtn 
inc ax 

R Rtn: 

fend 
} 

long Get Vec(vector) /* Uses DOS function 35h to fetch an interrupt vctr */ 


unsigned vector ; 
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#asm 
mov ah, 35h 


mov al, BYTE [bp+4) 
int 21h 

mov ax, Dx 

Mov dx,es 


#fend 


Set Vec(vector, addr) 
unsigned vector ; 
long addr ; 


/* Uses DOS function 25h to set an interrupt vctr */ 


#asm 
Mov ah, 25h 
mov al, BYTE [(bp+4) 
mov bx,WORD [bp+6] 
mov es,WORD [bp+8) 
int 2ih 

#end 


End Listing Four 


Listing Five 


- Listing Five 


/* 
* SYSDEF.H 
* Standard system definitions 
* Ross P. Nelson 
*/ 


/* Expanded public/external syntax */ 
#define FORWARD extern 

#define IMPORT extern 

#define PUBLIC 


#ifdef DEBUG 


/* Generate symbols if debugging, else don't export */ 
#define LOCAL 


#felse 

#define LOCAL static 

#endif 

/* System constants and data types */ 
#define TRUE 

#define FALSE 0 

typedef unsigned char byte; 
typedef byte boolean; 
typedef unsigned short word; 


typedef unsigned short selector; 


/* 

. STD.C Copyright (C) 1985 Ross P. Nelson 

* 

* Redirect stdin/stdout. Usually called before performing an 
* EXEC, so that the child task will read or write via a file. 
~ Sample usage is in the MAIN routine below. 

=f 


#include <stdio.h> 
#include <dos.h> 
#include <iosl.fp 
#include <sysdef.nm 


IMPORT word _PSP(2}; /* offset, segment */ 
IMPORT struct UFB _ufbs[]; 
/* 
es SETSTDIO 
® Set stdin or stdout to the file. Caller is responisble for 
* having opened the file in the corrent mode and positioning it 
* as necessary. Returns a value to be used when reseting stdio 
* to original value. 
wy. 


PUBLIC int setstdio (stdfp, newfp) 
FILE *stdfp, *newfp; 

{ 

byte reset, save; 

int handle, redir; 


handle = ufbs[fileno (newfp) ] .ufbfh; 
redir = ufbs(fileno (stdfp)].ufbfh; 
save = OxFF; 

peek ( PSP[1], 0x18 + handle, éreset, Bis 
poke ( PSP{1], 0x18 + handle, &save, 1); 
peek ( “PSP[1], 0x18 + redir, &save, 1); 
poke GC PSP[1], 0x18 + redir, é&reset, 1); 
return (int) save; 


/* 

* RESTDIO 

* Must be called to reset stdio values to original. Caller is 
* responsible for closing file after restdio. 

a7 


PUBLIC void restdio (stdfp, newfp, reset) 
FILE *stdfp, *newfp; 
int reset; 


{ 
byte direct, old; 
int handle, redir; 


handle = ufbs([fileno (newfp) ].ufbfh; 

redir = _ufbs[fileno (stdfp) ] .ufbfh; 

old = (byte) reset; 

peek (_PSP[{1], 0x18 + redir, &direct, 1); 

poke (_PSP{1], 0x18 + redir, &old, 1); 

poke ("PSP [1], 0x18 + handle, edirect, > 
} 


#if (PROTOTYPE) 
abort (s) 
char *s; 
{ 
fprintf (stderr, s); 


exit (4); (continued on next page) 
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C CODE FOR THE PC 


source code, of course 


Se 


GraphiC 3.0 hi-res color plots 
Panache C Program Generator 
QC88& C Compiler . 
Concurrent Cie. 

Coder’s Prolog in C 
Translate Rules to C 

fee i eee te 

VAGCree Re oe gy 
tiny-c interpreter & shell 
Xlisp 1.5a & tiny-Prolog 

C Tools 


The Austin Code Works 
11100 Leafwood Lane 
Austin, Texas 78750-8409 
(512) 258-0785 


Free shipping on prepaid orders No credit cards 
Circle no. 250 on reader service card. 


_ Transform Your Programs 
edward K. a with 
CPP—C Preprocessor Plus 


Includes ALL features of the standard C preprocessor.3% 

¢ Define arbitrarily complex macros with #define command. 

e Include and nest files to any depth with #include command. 

e Include lines with #if, #ifdef and #ifndef commands. 

© Define multiple constants with #enum command. 

e Optional extra feature: Imbed formatting or other commands 
in your source code. (Lines starting with . or « are ignored.) 


Fast and flexible me 

e 30 times faster than the Preprocessor published in Dr. Dobb’s S 
Journal. 

¢ Can be used for any language, including assembler. 

© Can be used as a stand-alone macro/include processor. 

© Code can be used as the lexical analyzer for parsers or 
assemblers. 








Complete: 

e You get complete SOURCE CODE in andard C. 

e You get everything you need to use CPP immediately. 

¢ CPP is unconditionally guaranteed. If for any reason you are 
not satisfied with CPP, your money will be refunded promptly. 


Price: $95. 
Enteleki, Inc. 
210 N. Bassett St., Room 101 
Madison, WI 53703 
Tele. (608) 258-7078 


TO ORDER: Specify both the operating system (MS-DOS, CP/M 80 or CPM 68k) 
and the disk format (8 inch CP/M or the exact type of 5% inch disk). Send a check or 
money order for $95 ($105 for foreign orders). Foreign checks must be denominated 
in U.S. dollars drawn on a U.S. bank. Sorry, | do NOT accept phone, credit card or 
COD orders. Please do NOT send purchase orders unless a check is included. 
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Listing Five 


(Listing continued, text begins on page 104.) 





} 


A full year for only $18. 




































main () 
hink about it, a full year of technical and eee EF: 
useful information about C. The C Journal int reset; 
provides programming information for any 
machine — IBM PC™, UNIX™ -based, Macin- puts ("Begin test - opening file TEST.XX"); 
tosh™, or CP/M™ - micro, mini or mainframe. f = fopen ("test.xx", “w"); 
Look forward to each issue for: if (£ = NULL) 
— NEW in-depth reviews and feature articles— abort ("open failed"); 
C compilers, editors, interpreters, function reset = setstdio (stdout, f); /* stdout <- f */ 
libraries and books. fprintf (stderr, “invoking LS\n"); /* can't write to stdout */ 
— NEW efficiency hints and tips if (forklp ("ls.exe", "1s", NULL)) {  =§/* run LS */ 
— NEW interviews with C experts restdio (stdout, f, reset); /* clean up if cant exec */ 
— NEW news and rumors from the ANSI stan- oe (“exec failed”); 
dards committee and industry. teoiay. wait te 7s Wait tii 1S ae 
ubscribe today to the only magazine that restdio (stdout, f, reset); /* stdout <- original value */ 
os is dedicated specifically to C - The C fclose (f); : 
Journal. puts (“Test completed ~ LS results in TEST.XX"); 
Please send check or money order for $18 boat 







(cover price $28) to: End Listing Five 


==InfoPro Systems 


: 3108 Route 10, Denville, NJ 07834 
\Call TOLL FREE (800) 628-2828 ext. 849 


or charge card orders only) 
Please add $9 for overseas mail and $6 for Canadian subscriptions. 
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PRR ARKKKRKK KK KEK EKER KEKE KEK KK KK KEK KKK KEKK KEK KKEEKKRKEKKKKEEREKKEEKKKKEKEK 





* x 
* Wildcard filename expansion for MS-DOS 2.00 and later. 7 
ok * 
;* By: Randy Langer, MicroSphere Technology i 
PRR RK KK KKK KK KK KEKE KKK KEK EKER KEK KKK KEKE KKK KKK KK EK KK EK KKK KKKKKKKKKKKKK 
ifndef model ; if default model (both small) 
model equ 0 0 = small code, small data 


; 2 = small code, large data 


; 1 = large code, small data 
; 3 = large code, large data 


THe G sourRNAL eit 


Trademarks —IBM PC: IBM Corp.; UNIX: AT&T Bell Labs; Macintosh: Apple Computer Corp. codeseg ue eee ‘code! 
CP/M: Digital Research Inc.; The € Journal: InfoPro Systems. : [ 





public wildcard_ 


Circle no. 194 on reader service card. 
2£ model and 1 


wildcard_ proc far 


Power Tools for else 


t 8) tte ivi wildcard _ proc near 
system builders 25 
h b ; £ int 
mov ‘bp, sp ; point to our stack 
Call today for our free catalog of design aids, if model and 2 
compilers, libraries, debuggers, and support aa oa : gids BP ee he 
tools for Apple and IBM micro computers. The mov ds, [bp+6] ; and get segment of struct ptr 
Power Tools catalog includes product descrip- ceatr 
tions, warranty and license terms, and all the Be ees El ee 5 rah tei 
information you need to make an intelligent pur- Sie cise aka ; get -Eiag byte g 
chase decision. or al,al ; see if high bit set 
js rtn null ; if so, no more to find 
: push es ; Save reg used by DOS call 
TSF offers technical support, competitive pric- ped ee cere eee 
2 « 4 , ol 
ing, free UPS shipping on orders over $100, anda mov ax,es ; save DTA segment 
: es * Oo , po ES 
reasonable return policy. Visa, MasterCard, and Ceca ae t cege mie oes ioe ae 
American Express accepted without surcharge. push = ax ; save addr of old DTA 
: sh b 
TSF helps you get your job done. te a [bp+4 } ; get ptr to user's struct 
add dx,2 ; int ohh b 
Sample Prices: Call Toll F fe 2th ee 
. o ree mov 5 : en er agai 
MS . ‘ 24 hrs a day/7 days a week mov za [bet] ; sat soaken at ehinates 3 
Quick Basic $49.00 mov ah,79 ; — token for search next 
5 test byt tc bah yl.- it this: 2 
Periscope II $129.00 Ask For Operator 2053 ane eee ps : Seanch Peter ee eee 
DS Backup $64.95 inc byte ptr [bx] ; else, set flag 
10 Diskette Mailers $4.95 800-543-6277 ee ee oe ah * and set token for search first 
Gimpel PC Lint $139.00 < MOV dx, [bx+45] ; get offset to filespec 
PCMacBasic $100.00 Calif: 800-368-7600 if model and 2 
mov ds, [bx+47] 
° Dept. C-2 » 649 Mission Street ae 
¢ San Francisco * CA 94105 int 21h ; do the search 
© (415) 957-0111 pop dx * get addr of old DTA 
The Software Family™ Be ens 


(continued on page 94) 
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CAD — THE BEST 
IS EVEN BETTER! 


ProDesign Il — The Easy-to-Use CAD System. it’s the NUMBER ONE CAD PACK- 
AGE for under $1000. And it costs only $299. With over 25,000 satisfied users, 
ProDesign Il outshines anything in its class. It outshines many packages costing 
$2000 and more! ProDesign Il offers more features, more compatibility, and 
superior ease-of-use. 





But now, THE BEST IS EVEN BETTER! 


Version 2.5 of ProDesign Il is now available. More than 50 additional features 
have been added to ProDesign Il. Features such as Pattern Hatching, On-Screen 
Mienus, Geometric Calculations, Macros, Parallel Lines, Parallel Curves, en- 
hanced Auto-Dimensioning, Block Arrays and Circular Arrays, to name a few. 
Features that make ProDesign II even more powerful. Features that make 
ProDesign Il even easier to use. 


How much more does version 2.5 cost? None! The new ProDesign Il is still S299! 
Where can you get it? See your local dealer, or contact us: 


AMERICAN SMALL BUSINESS COMPUTERS 
118 SOUTH MILL STREET 
PRYOR, OK 74361 
(918) 825-4844 


Telex 9102400302 





PRODESIGN II — ONLY $299! 
ET ete 
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Listing Six (Listing continued, text begins on page 104.) 


push ax ; save return code from search 
mov ah,26 ; restore DTA ptr 
int 21h 
pop ax ; restore return code 
pop ds ; get back segment of user struct 
mov bx, [bpt4] ; and its offest 
or ax,ax ; see if search successful 
jz rtn name branch if so 
mov byte ptr [bx], 128 ; else, Say no more 

rtn null: 

s xor ax,ax ; return null ptr 

mov dx,ax ; in case of large data 

wild end: 

if model and 2 
pop ds 

endif 
pop bp ; restore frame pointer 
ret ; and return 

rtn name: 

ie mov dx,ds ; in case of large data model 

mov ax, 32 ; offset to file name 
add ax,bDx ; add to struct base 
jmp wild end ; and exit 

wildcard _ endp 

codeseg ends 
end End Listing Six 


Listing Seven 
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WILDCARD.H for use with WILDCARD.ASM 
by Randy Langer, Microsphere Technology 


a/ 


typedef struct 
{ 


char flag; 





Set up a complete graphics 
workstation on your PC 
for under $100! 


MicroPlot’s enhanced 
PC-PLOT-III graphics 
emulator software package .. 













© contains all the 
necessary program 
modules to implement 
a complete graphics 
workstation utilizing 
powerful mainframe 
graphics software 














For more inf 
PLOT-III can 
productivity oe 
call toll free 1-8 
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659-H Park Meadow Rd Westerville, Ohio 
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char att_sel; 

char tempdata [21]; /* don't mess 
with this */ 

char f atts; 

long datetime; 

long filesize; 

char filename [13]; 

char *filespec; 

} W_CARD; 
char *wildcard(); 


End Listing Seven 


Listing Eight 


Listing 8 for November 1986 16-Bit Column in DDJ 


* WILDTEST.C Program to demonstrate use of WILDCARD.ASM 
* by Randy Langer, MicroSphere Technology. 
x 


“f 
#include "stdio.h" 
#include "“wildcard.h" 
main(argc, argv) 
int arge; 
STR argv[]; 
{ 
W CARD y; 
STR 8; 


while (--argc) 
{ 
y-filespec = *++targv; 
y.att_sel = 0x10; 
y-flag = 0; 
while(s = wildcard (&y)) 
printf("%s\n", 8s); 


End Listings 


PLOTDEV ADDS 


GRAPHICS TO amt 39 


uC innovator a creative PC software programs is _ to 


announce PlotDev, the alternative to virtual device drivers and 
graphics tool kits for PC-DOS graphics programs. 








e Installable PC-DOS device 
driver adds graphics command 
capabilities to any program 
language 


Allows full screen PC-DOS 
command editing by unsticking 
the cursor 


e Provides user with all the 
intelligent alpha terminal 
commands of a DEC VT-100 


e Provides user with the graphics 
commands of the Tektronix 
4010/4014 and 4027 graphics 
terminals 


e Supports most popular graphics e And much more ... 
boards and provides a built-in 
graphics screen dump for 


printers Site license and 


educational 
e Non-interfering with memory discounts available. 
resident or application programs 


For a detailed PlotDev brochure or for ordering 
information call toll free 1-800-654-1217. Visa and 
MasterCard welcome. 


PT ALALL 
TY VL 
Zi INL 
(42S Bs 


———— e 


MicroPlot 


659-H Park Meadow Road Westerville, Ohio 43081 (614) 882-4786 
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GET A HEAD START FOR 1987 
With these SUPERior Programmer’ s Packages 


The Aspen Systems Subroutine Editor (ASE) you can call 
from your programs. Design your own screen layouts - - 
update in several windows simultaneously. ASE is: 
* TRANSPORTABLE - can be configured for any 
keyboard and almost any computer or language 
under MSDOS. 








C-PROGRANMMERS 


ANY HM Ile wie ik oe 


* VERSATILE - customize input for any application. : io tps: . : 

* COMPLETE - with full screen edit capabilities and a Fie System Utility Libraries 
wide variety of automatic conversions. 

* EASY TO USE - data and screen layouts described All products are written entirely in K&R C. Source 
in a single map. code inchided, No Royalties, Powerful & Portable. 

* FULLY DOCUMENTED - including examples in BASIC, 
PASCAL, FORTRAN, and even COBOL. BTree Library § 2S oo 

* AFFORDABLE - ea 


Pei SU Oe ee Rs se $99 

DEMO (See what ASE can do for you!)......... $ 3 

The Aspen Systems Subroutine Package (ASP) - with many 

functions unavailable or difficult to perform in high 
level languages. ASP is: 

* TRANSPORTABLE - can be configured for almost any 


® High speed random and sequential access: suse 
® Multiple keys per data file with up to 16 million records per file. 


¢ Duplicate keys, variable length data records. ee cok 
Roan, 410.0o 


Greatly speeds application development. 


2 
computer or language under MSDOS or CP/M. e 6 : : ; “af ‘ 
# FULLY DOCUMENTED - a 300 page manual, with nang lone coe use of Gapenees manager with flexibility of program 
examples in BASIC, PASCAL, FORTRAN, and even ® Supports multi key files and dynamic index definition. 
COBOL. ® Very easy to use. = pes 
* EFFICIENT - faster, with smaller memory requirements 
than some high level languages. Make Bay a Ooo 
AFFORDABLE - ASP is still only................ $130 ces siiaaltle Ci 


* 
ASP includes 150+ subroutines: conversions; | sorts; ° Patterned after the UNIX utility. 
® Works for programs written in every language. 


string, bit, date/time functions; decimal arithmetic, ree ‘ag 
and MORE. ¢ Full macros, File name expansion and built in rules. 


Prices are PPD (continental USA). Full Documentation and Example Programs. Included. 
Colorado Residents add 3%. : 00 


For more mitormation call or salto: | 1343 Stanbury Drive 


- Oakville, Ontario, Canada 
' . L6L-.2d5 
(416) 825-0903 


Credit cards accepted. 


P.O. Box 1163 
Grand Junction, CO 81502 
(303) 245-3262 


een VISA/MasterCard accepted 
CP Mand MS-DOS are trademarks of 
SYBTE| ] 1 Digital Research and Microsoft. respectively. 
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Dealer inquiries invited. 
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SMILES FOR CHRISTMAS 


OX the thrill of giving can rival the excitement and appreciation your favorite programmer will feel while opening your 
thoughtful gift of JACK™, The Resident Program Developers Kit. 





JACK contains everything required to easily create RAM resident software without the problems of DOS 
re-entrancy, Memory management or windows. 


JACK FEATURES: 


Virtually any EXISTING C or ASSEMBLER program can be made memory resident without any modification to the 
existing source code. 


Screens are automatically saved when popping up and restored upon popping down. 

Your choice of Hotkey and interrupt vector for program use. 

You can issue DOS function calls and perform disk I/O in your memory resident program. 

No more system crashes and lost data. All programs developed with JACK will peacefully coexist. 
JACK applications can be loaded and popped-up in any order. 


Programs developed with JACK will not become obsolete because JACK does not make any use of undocumented 
DOS calls. [JACK requires DOS Version 2.0 or higher] 


And just in time for Christmas, CrackerJack would like to introduce BEYOND, a library of memory management and service 
routines for the Intel Above Board. Now all of your programs can take advantage of expanded memory. With our library and 
Intel’s ABOVE Board, your programs can go ABOVE and BEYOND their previous limitations. 


To Order, please send $199.95 [US] + S/H for JACK or $49.95 [US] + S/H for BEYOND by certified check or international 


money order to: 
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Crackerjack Microsoftware Corporation. 
‘e200 Bay Street PO Box 86, 

Toronto, Ontario M5J-2J2 

Canada. 


(416) 865-9621. 


When ordering, please specify either the assembler version or C version of JACK and indicate the vendor and release level of 
your compiler. 


JACK, CRACKERJACK and BEYOND are registered trademarks of CrackerJack Microsoftware Corporation, Intel is a registered trademark of Intel Corporation, Microsoft and MS-DOS are 
registered trademarks of Microsoft Corporation. 
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STRUCTURED PROGRAMMING 


Listing One (Text begins on page 108.) 


Listing 1. Contents of Turbo Pascal included ProcParm.INC file. a fe cee 
{ ProcParm.INC Version 1.1 86/05/07 JI:3J-1 
END; (* IF *) 
Ss rm.PAS for an explanation. UNTIL I > J; 
ee tease — IF Left < J THEN Sort (Left,J):; 
Author: Mike Babulic Compuserve ID: 72307,314 FIDO: 134/1 IFI< Right THEN Sort (I,Right); 
3827 Charleswood Dr. N.W. END; (* Sort *) 
£ Al rt e 
Calgary berta ‘idee 
T2L 2C7 Sort (FIRST, LAST) 


END; (* QuickSort *) 
} 


procedure Call ProcParn; ( 8 eee nnn nn --------=- Use the ProcParm Procedure <--------------=-- *) 
ies {$I PROCPARM.INC} 
Sear POP a } rere Seve See Pe Re PROCEDURE Dummyl(VAR A : Vector; P : INTEGER); 


$8B/$66/$02/ { SS:MOV SP, [BP+2]) ;Exchange Return Addr & 


Procedure Ptr} — 


Call ProcParm; 


$87/$66/$04/ { SS:XCHG SP, (BP+4] } END; (* Dummyl *) 


$89/$66/$02 { SS:MOV [BP+2],SP } 
) 
end; Ars : : . 
End Listing One PROCEDURE Sortl1(VAR A : Vector; P : INTEGER); 
BEGIN 
Lj Ti T Dummy (A, P); 
isting Two pol ets 
Listing 2. Contents of file ProcPar.Qk. ( Ren nnn an en nn = Use Procparm.qk -<---<---<------------ mat) 
{ ProcParm.QK Version 1.0 86/04/22 | PROCEDURE Dummy2(VAR A : Vector; P : INTEGER); 
BEGIN 
Author: Mike Babulic Compuserve ID: 72307,314 FIDO: 134/1 {$I PROCPARM.QK)} 
3827 Charleswood Dr. N.W. END; (* Dummy2 *) 
Calgary, Alberta, 
CANADA 
T2L 2C7 PROCEDURE Sort2(VAR A : Vector; P : INTEGER); 
} 
Inline ( BEGIN 
$8B/$66/$02/ { SS:MOV SP, [BP+2]} sExchange Return Addr & Dummy2(A, P) 
Procedure Ptr) END; (* Sort2 *) 
$87/$66/$04/ { S$S:XCHG SP, (BP+4] } : 
$89/$66/$02/ { SS:MOV [BP+2)],SP } Soh sare pena nile a erm ice cL ames poet ta aa ne om, Crmate stray o—<= ) 
89/$EC : : d Turbo Ret 
ari aioe! : er ee ete ‘ oe PROCEDURE Create Array(VAR A : Vector; Start, Finish : INTEGER); 
(if no Parameters) } (* Create a reverse sorted array *) 
$5D/ { PCY Br } 
$c3 { RET s;Near Return } VAR I : INTEGER; 


) 


ee BEGIN 
End Listing Two FOR I := Start TO Finish DO 


A(I}) := Finish + 1-I 


Listing Three END; (* Create Array *) 


(Femme mmm em nen wee enon see eenerowseeococeccene= Display Array -<-<----- *) 
Listing 3. Turbo Pascal demo program for procedural parameters. = 
PROCEDURE Display Array(VAR A : Vector; Start, Finish : INTEGER); 
| program proc_param demo; ee 
Vv. : GER; 
CONST FIRST = 1; - Ssouing 7. Seka 
LAST = 1000; : 
BEGIN 
' ey). . = 
TYPE Vector = ARRAY (FIRST..LAST)] OF INTEGER; a ene a EA Oe eee 
VAR A : Vector; WRITE (A(I] 38); 


I, Start, Finish : INTEGER; WRITELN; WRITELN;: 


Ice ciate Sia lak Me eal a alte ak *) END; (* Display Array *) 
PROCEDURE Shell Sort (VAR A : Vector); eet he. Seka ee TT ete 
VAK I, J, Offset, Skip, Tempo, NData : INTEGER; “ee rear en aan lay time *) 
In_ Order : BOOLEAN; _ 
ea ; TYPE REGTYPE = record 
eis AX, BX, CX, DX, BP, 
RE DI,SI,DS,ED,FLAGS : INTEGER 
“= = ; END; 
Skip := NDATA; 
WHILE Skip > 1 DO BEGIN TIME REC = RECORD 
Skip oF Skip DIV 2; ee HOUR, MIN, SEC, HSEC : BYTE 
END; 
In Order := TRUE; 


FOR J := FIRST TO LAST - Skip DO BEGIN 
I := J + Skip; 


VAR REGISTER : REGTYPE; 
IF A{J) > A{I] THEN BEGIN AH : BYTE; 
In_Order := FALSE; TIME : TIME _REC; 
Tempo := A[I); Fe 
A(I}) := A[J];: BEGIN 
A({J] := Tempo 
END; (* IF *) AH := 2c: 
END; (* FOR *) ; 
i UNTIL In_Order; WITH REGISTER, TIME DO BEGIN 
¢ (* WHILE *) AX:= AH SHL 8; 
END; (* Shell Sort *) MSDOS (REGISTER) ; 
( ¥en - - - -- -- -- - -- + = = = - +--+ -- QuickSort ------- $} ae “* Senet 
PROCEDURE QuickSort(VAR A : Vector); aa i es 
s ' 1 . a ' e 1 : t . 
paces sort (Left, Right : INTEGER); WRITELN(' at , HOUR, : ° MIN, s~-°, SEG, * . <,HSEC) 
END; 
VAR I, J, END; (* Show Time *) 
Pivot, Tempo : INTEGER; 
BEGIN 
I := Left; J := Right; BEGIN 
Pivot := A[(Left + Right) DIV 2]: CirScr; 
REPEAT Satie has index range of ',FIRST,' to ',LAST); 
WHILE A[{I] < Pivot DOI := I +15; WRITE ('Enter index of first element to view '); READLN(Start); WRITELN; 
WHILE Pivot < A[J] DOJ := J - 1; WRITE(‘Enter index of last element to view '); READLN(Finish); WRITELN; 
IF I <= J THEN BEGIN IF Start < FIRST THEN Start := FIRST; 
ve ce hazy: IF (Finish > LAST) THEN Finish := LAST; 
Ali i= Aa): IF Finish < Start THEN Finish := Start + (LAST - FIRST + 1) DIV 10; 
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WRITELN (‘Using ProcParm Procedure '); WRITELN; WRITELN; 
Create Array(A, FIRST, LAST); 

WRITELN(‘'Using Shell Sort’); 

WRITE (‘Start '); Show_Time; 

Sortl(A,Ofs(Shell Sort)); 

WRITE ('Finish'); Show_Time; 

Display Array (A, Start,Finish) ; 


spon Bs | (A, FIRST, LAST); 
WRITELN (‘Using QuickSort'); 
WRITE('Start '); Show Time; 
Sort1{(A, Ofs (QuickSort)); 
WRITE('Finish'); Show_Time; 
Display Array(A, Start, Finish); 


WRITELN('Using ProcParm.QK ‘); WRITELN; WRITELN; 
Create Array(A, FIRST, LAST); 

WRITELN('Using Shell Sort’); 

WRITE('Start '); Show Time; 
Sort2(A,Ofs(Shell_Sort)); 

WRITE('Finish'); Show_Time: 

Display Array (A, Start, Finish); 


Cee iat (A, FIRST, LAST); 
WRITELN ('Using QuickSort'); 
WRITE('Start '); Show Time: 
Sort2(A, Ofs (QuickSort)); 
WRITE('Finish'); Show_Time; 
Display Array (A, Start, Finish); 


END. End Listing Three 


Listing Four 


Listing 4. Definition and implementation modules for BestFit library which 


uses a local model InnerWorking. 

DEFINITION MODULE BestFit; 

EXPORT QUALIFIED Regression, Slope, Intercept, R2; 

PROCEDURE Regression(VAR X, Y : ARRAY OF REAL; (* input *) 
N, LowerBound : CARDINAL (* input *)):; 

(* Procedure to process arrays X and Y *) 


PROCEDURE Slope({) : REAL; 
(* Function that returns the slope of the best fit line *) 


PROCEDURE Intercept() : REAL; 
(* Function that returns the intercept of the best fit line *) 


PROCEDURE R2() : REAL; 
(* Function that returns the goodness of the best fit line *) 


END BestFit. 


IMPLEMENTATION MODULE BestFit; 
FROM MathLibO IMPORT sqrt; 


MODULE InnerWorking: 


IMPORT sqrt; 
EXPORT Regression, Slope, Intercept, R2; 


VAR Sum, SumX, SumXX, SumY, SumYY, SumXY, (* Stat summation *) 
MeanX, MeanY, SdevX, SdevY : REAL; 


PROCEDURE Regression(VAR X, Y : ARRAY OF REAL; (* input *) 
N, LowerBound : CARDINAL (* input *)); 
(* Procedure to process arrays X and Y *) 


VAR i : CARDINAL; 
Xs, Ys : REAL; 


BEGIN 
(* Loop for stat summation *) 
FOR i := 0 TO N-LowerBound DO 
Xs := X[i): Ys := Y(i); 
Sum := Sum + 1.0; 
SumX := SumX + Xs; 
SumY := SumY + Ys; 
SumxX := SumXX + Xs * Xs; 
SumYY := SumYY + Ys * Ys; 
SumXY := SumXY + Xs * Ys; 
END; 
(* Calculate intermediate results *) 
MeanX := SumX / Sun; 
MeanY := Sumy / Sun; 
SdevX := sqrt((SumXx - SumX * Sumx / Sum)/(Sum - 1.0)); 
SdevY := sqrt((SumYY - SumY * Sumy / Sum)/(Sum - 1.0)); 


END Regression; 


PROCEDURE Slope() : REAL; 
(* Function that returns the slope of the best fit line *) 


BEGIN 
IF Sum > 1.0 THEN 
RETURN (SumXY - MeanX * MeanY * Sum) / (SdevX * SdevX * (Sum - 1.0)) 
ELSE RETURN 0.0 (* default value for insufficient data *) 
END; 
END Slope; 


PROCEDURE Intercept() : REAL; 
(* Function that returns the intercept of the best fit line *) 
BEGIN 
IF Sum > 1.0 THEN 
RETURN MeanY - Slope() * Meanx 
ELSE RETURN 0.0 (* default value for insufficient data *) 
END; 
END Intercept; 


PROCEDURE R2() : REAL; 
(* Function that returns the goodness of the best fit line *) 


VAR R : REAL; 


BEGIN 
IF Sum > 1.0 THEN 
R := Sdevx / SdevY * Slope(); 


RETURN R * R (continued on page 99) 


Two great reasons to buy Turbo Pascal: 
System Builder *99°° and Report Builder °75°° 


From the Designer Series by Royal American Technologies. !-=-----""""sr"*e=--- 


State-Of-The-Art Program Gener- 
ators that automatically build a 
Relational Database system with- 
out coding. Entry level ‘“‘coders”’ 
can produce Database systems 
without coding. Developers 
have more flexibility and horse- 
power than any development 
tool on the market. 





Self-documenting program includes 
screen schematics. System Builder 
will generate 2,000 lines of program 
code in approximately 6 seconds. 





SYSTEM BUILDER FEATURES: 






§ Royal American Technologies 
201 Sansome, Suite 202 
San Francisco, CA 94104 


(800) 654-7766 
in California (800) 851-2555 
Ask for Operator 102. 
Please rush me: ___ copies of SYSTEM 
BUILDER at $99.95 per copy; — copies 
of REPORT BUILDER at $75.00 per copy. 


I’ve enclosed $5.00 for postage and handling. 
California residents add 6% sales tax. 





* Automatically generates Indented, Structured, Copy Book Source Code 
ready for compiling with Turbo Pascal (no programming needed) 

¢ Paint Application and Menu screens using Keyboard ¢ Screens all use 
In-Line machine code for exceptional speed ® 16 Datafiles and 16 Index 
Keys per application ¢ Paint functions include: —Center, copy, move, 
delete, insert or restore a line with one keystroke —Cut and paste blocks 
of text screen to screen —Draw and erase boxes — Access special graphic 
characters and character fill —Go straight from screen to screen — Define 
colors and intensities * Support an unlimited number of memory variables 
¢ File Recovery Program ® automatically modify existing datafiles 

¢ Experienced developers can modify the System Builder * Develop sys- 
tems for Floppy or Hard Disk * Modify System Builder's output source 
code to include External Procedures, Functions and Inline Code ¢ Easy- 
to-use Interface Program included to access ASCII and Dbase Files 


REPORT BUILDER FEATURES: 


¢ Automatically generates Indented, Structured Source Code ready for 
compiling Turbo Pascal (no programming needed) * Automatically inter- 
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Name 
Address 
faces to a maximum of 16 Datafiles created with System Builder * Supports City 
Global Parameters such as Headings, Footers, Lines Per Page, Print Size 
and Ad Hoc Sorting © Page breaks on Sub-Totals * Reports can also in- State Zip 
clude Text Strings, Variables or Computed expressions containing refer- 
ences from up to 16 Datafiles * Use range input screens allow End Users Phone 


to select portions of a report as needed (i.e. specific account ranges can be 
requested) © Easy-to-use Interface Program included to access dBase Files 


VARS, System Integrators and Dealers, let’s ; 


work together. Head office: (415)397-7500 laa eee eee 





Payment: []Check [] Money Order (1) Cashiers 
Check [JAMEX LCIVISA L)MASTERCARD 


Expiration date 


Card Number 





Signature 





30-Day Money-Back Guarantee. Not copy- 
protected. $10 restocking fee if envelope is opened. 
System Requirements: IBM PC/XT/AT', or similar, with 
minimum 256K RAM, dual floppy drives, or hard disk, 
color or monochrome monitor, MS? or PC DOS! version 
2.0 or later, Turbo Pascal Version 2.0 or later (Normal, 
BCD or 8087 versions). 

' Trademark of International Business Machines Corp. 

“Trademark of Microsoft Corp. 

Turbo Pascal is a registered trademark of Borland International. 
“dBASE is a registered trademark of Ashton-Tate. 
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QNX: Other operating systems may never lift the PC to such heights. 


QNX was the first operating 
system with multi-tasking, multi- 
user capabilities for the IBM PC 
and compatibles (1982). QNX was 
first to achieve the same cap- 
abilities for the IBM AT and 
compatibles. Then, in 1984, QNX 
achieved integrated networking 
capability, something no other 
multi-user, multi-tasking 
operating system has achieved, 
or is likely to achieve, on IBM 
personal computers. 


QNX consistently beats com- 
petitive operating systems to 
each new height in PC perfor- 
mance. Unlike other multi-user, 
multi-tasking opeating systems, 
QNX is not UNIX-based. Being 
rigid and monolithic, UNIX 
architecture is difficult to adapt. 
By contrast, QNX is modular, 
based on message-passing, and 
easy to adapt. UNIX developers 


have had to preoccupy themselves 


with merely getting UNIX to work 
on the personal computer, while 
QNX,designed specifically for this 
environment, has enjoyed rapid 

and continuous growth. 


QNX’s superb performance and 


compact size is the result of one 


dedicated design team with a 


common purpose and complete 
understanding of both the 
software and the environment 
in which it must run. Quick 

and efficient on a PC, QNX 
soars on an AT. 


Of all multi-user, multi-tasking 
operatings systems, only QNX 
provides unrestricted communi- 
cations among all tasks anywhere 
on the network. Therefore, only 
QNX can implement true dis- 
tributed processing, distributed 
file systems, and distributed 
devices, with no need for central 
file servers. 





For further information or a free demonstration diskette, 


No one wants to abandon the 
tremendous amount of DOS soft- 
ware available. QNX does not force 
that choice. DOS 2.1 and 3.1 run 
as single-user tasks under QNX, 
even on the AT in protected mode. 


With over 22,000 systems 
installed worldwide, QNX remains 
unsurpassed in PC performance. 


End Users, VAR's, OEM's and 
Software Developers — ask us 
how QNX can add value to 
your products! 





please telephone (613) 726-1893. 


The only multi-user, multi-tasking, 
networking, real-time operating system 





for the IBM PC, AT 
and compatibles. 
By Quantum Software. 


Unix is a registered trademark of AT&T Bell Labs. IBM PC, AT. and PC DOS are trademarks of IBM Corp. 


Quantum Software Systems Ltd., Moodie Drive High Tech Park, 215 Stafford Road, Ottawa, Ontario, Canada K2H 9C1 
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STRUCTURED 
PROGRAMMING 


Listing Four 
(Listing continued, text begins on page 108.) 


ELSE RETURN 0.0 (* default value for insufficient data *) 
END; 
END R2; 


BEGIN 

(* Initilaize inner module by setting stat summation equal to zero *) 
Sum := 0.0; SumXy := 0.0; 
SumX := 0.0; Summ := 0.0; 
Sumy :~ 0.0; SumYY := 0.0; 

END InnerWorking; 


END BestFit. 


Listing Five 


Listing 5. Turbo Pascal program to demosntrate the first method for 
external menu storage. 


End Listing Four 


program test _methodl; 
(* Program to test first method for external menu sterage *) 


TYPE 
STRING14 = STRING(14); 
STRINGSO = STRING[80]; 
Screen_Image = ARRAY [0..24]) OF STRING80; 


VAR Shift_Row, Shift Col, Screen_Line Count : INTEGER; 
Screen_Line : Screen_Image; 
MenuFile : STRING14; 


PROCEDURE Read_Menu(Menu Filename : STRING14; 
VAR Shift _Row, Shift Col, 
Screen_Line Count : INTEGER; 
VAR Screen_Line : Screen_Image); 
(* Procedure to read menu image from text file. If file is *) 
(* nonexistant the program will halt. *) 


CONST MAX_SYMBOL = 255; 


TYPE CharSet = Set OF CHAR; 
Symbol Table = ARRAY [0..MAX_SYMBOL) OF INTEGER; 


VAR FileVar : TEXT; 
Line : STRING80; 
Table : Symbol Table; 
I, K, Error_Code : INTEGER; 
Symbol Char : CHAR; 
Operation Set : CharSet; 
Duplicate : BOOLEAN; 


( Reem wer ew om wee wwe oe wn oo eee ew owe ce en eee eee ee ce ew een cee one =t ) 


PROCEDURE INC(VAR A : INTEGER); 
(* Increment integer by one *) 
BEGIN 

A:=Az+1 
END; (* INC *) 


PROCEDURE Upcase Str(VAR $ : STRING80); 
(* Convert string to upercase *) 
VAR I : INTEGER; 
BEGIN 
FOR I := 1 TO Length(S) DO 
S[I) := Upease(S[I]): 


END; (* Upease Str *) 


FUNCTION Extract _Number(Line : STRING€0; Skip : INTEGER; 
VAR ErrorCode : INTEGER) : INTEGER; 


(* Function to extract an integer from a text line *) 
VAR J : INTEGER; 


BEGIN 
IF Skip > 0 THEN Delete(Line,1,Skip): (* Remeve chars from string *) 
(* Remove blanks *) 
WHILE Line{1} = ' ' DO 
Delete(Line,1,1); 
(* END WHILE *) 
Line := Line({1) + Line[2) + Line([3]; 
VAL (Line, J, Error_Code); 
Extract_Number := J 
END; (* Extract Number *) 


PROCEDURE Build Screen(Line : STRINGSO; 
VAR Screen_Line Count : INTEGER; 
VAR Screen_Line : Screen_Image); 


VAR J : INTEGER: 
Ch : CHAR; 


BEGIN 
IF Length(Line) > 0 THEN BEGIN 

FOR J := 1 TO Length(Line) DO BEGIN 

Ch := Line[J]: 

IF Ch IN Operation Set THEN 

Line(J] := CHR(Table[ORD(Ch) )); 

END; (* FOR *) 
Screen_Line[Screen_Line_ Count) := Line; 
INC (Screen_Line Count); 


END; 
END; (* Build Screen *) (continued on next page) 
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PROGRAMMERS 
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STRUCTURED PROGRAMMING 


LisTi Ng FIVE (Listing continued, text begins on page 108.) 


BEGIN 
Assign(FileVar, Menu_Filenane) ; 
Reset (FileVar); 
IF (IOResult = 0) 
THEN BEGIN 


Operation Bet “¢s.- £72 °578", to bt et te, ete tt ot tate th 


(* Initialize screen line strings *) 
FOR I := 0 TO 24 DO 

Screen Line[I} := ''; 
(* Initialize symbol table entries *) 
FOR I := 0 TO MAX SYMBOL DO 

Table(I) := I; 


(* Read first line *) 
READLN(FileVar, Line); 
Upcase Str(Line); 
WHILE (NOT Eof(FIleVar)) AND (Line <> 'START') DO BEGIN 
IF Line[{1] IN Operation set 
THEN BEGIN 
Symbol Char := Line[1); 
K := ORD (Symbol _ Char); 
Table(K) := Extract _Number (Line, 1,Error_ code) ; 
IF (Error Code > 0) ~OR 
(NOT (Table ([K] IN [0..255)).) THEN 
Table(K) :=— Ord('*'); 
END; 
(* Read next line *) 
READLN (FileVar, Line); 
END; (* WHILE *) 
Screen_Line Count := 0; 
Shift Col := 0; 
shift_ Row := 0; 
(* Read next line that may contain row/column offset *) 
FOR I := 1 TO 2 DO BEGIN 
READLN (FileVar, Line); 
Upcase Str(Line); 
IF Pos('SHIFTROW', Line) > 0 THEN BEGIN 
Shift_Row := Extract Number (Line, 8,Error Code); 
IF Error _Code > 0 THEN Shift _Row := 0; 
END 
ELSE IF Pos('SHIFTCOL',Line) > 0 THEN BEGIN 
Shift _Col := Extract Number (Line, 8,Error _Code); 
IF Error _Code > 0 THEN Shift _Col := 0; 
END 
ELSE Build Screen(Line,Screen_Line Count, Screen_Line) ; 
END; (* FOR *) 


WHILE NOT EOF(FileVar) AND (Screen_ Line | Count < 25) DO BEGIN 
READLN (FileVar, Line); 
Build Screen(Line,Screen_Line Count,Screen_Line); 
END; (* WHILE *) 
Close(FileVar); 
END 
ELSE Halt; 


END; (* Read Menu *) 


PROCEDURE DISP_STR(S : STRING80; Row, Col : INTEGER); 
(* Procedure to write a string to the screen memory *) 


TYPE SCREEN80 = ARRAY [1..25,1..80,1..2] OF CHAR; 


VAR MONODISP : SCREEN80 Absolute $B000:0000; 
COLODISP : SCREEN80 Absolute $B800:0000; 
I, J, Mode : INTEGER; 


BEGIN 


J := Length(S); 
Mode := MEM[$0040:$0049); 
IF Mode IN [(2..3] THEN 
FOR I := 1 TO J DO 
COLODISP [Row,Col + I - 1,1) := S[I]; 
IF Mode = 7 THEN 
FOR I := 1 TO J DO 
MONODISP [Row,Col + I -1,1]) := S[I); 
END; 


(* ee eee ee ee eee ee wee ew ee eee ee ee ee ee om ae ee ee ee ee Oe ee ee we ee ee ee ee *) 


PROCEDURE Show Menu(VAR Shift Row, Shift _Col, Screen_Line Count : INTEGER; 
VAR Screen Line : Screen Image); 


VAR I : INTEGER; 


BEGIN 
FOR I := 0 TO Screen_Line Count DO 
DISP_STR(Screen_Line[I), (I+Shift_Rowt+t1l), (1+Shift_Col)); 
END; (* Show Menu *) 
BEGIN 
ClrScr; 


WRITE(‘Enter filename '); READLN(MenuFile); WRITELN; 
Read_Menu(MenuFile, Shift_Row, Shift_Col, 
Screen Line Count, Screen Line); 
Show Menu (Shift _Row, Shift _Col, Screen_ Line Count, 
REPEAT UNTIL KeyPressed; 
END. 


Screen_Line); 
End Listing Five 
Listing 6. Turbo Pascal program to demosntrate the second method for 
external menu storage. 


program test_method2; 


(* Program to test the second method for external menu storage *) 


TYPE 
STRING14 = STRING(14]; 
LSTRING = STRING(255); 
Screen_Image = ARRAY [0..24) OF LSTRING; 
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VAR Shift_Row, Shift Col, Screen_Line Count : INTEGER; 
Screen Line : Screen_Image; 
MenuFile : STRING14; 


PROCEDURE Read Menu(Menu Filename : STRING14; 
VAR Shift _Row, Shift Col, 
Screen_Line Count : INTEGER; 
VAR Screen Line : Screen Image); 
(* Procedure to read menu image from text file. If file is *) 
(* nonexistant the program will halt. *) 


CONST MAX_SYMBOL = 255; 


TYPE CharSet = Set OF CHAR; 
Symbol _ Table = ARRAY [0..MAX_ SYMBOL] OF INTEGER; 


VAR FileVar : TEXT; 
Line : LSTRING; 
Table : Symbol Table; 
I, K, Error Code, 
Upper Left _Corner, Upper Right Corner, Lower Left Corner, 
Lower Right _ Corner, Horizontal ~Line, Vertical _Line, 
Cross Bar, Left _Tee, Right _Tee, 
Up Tee, Down Tee, 
Left Edge, Right Edge, 
Vertical _Frames, “Horizontal _Frames, Frame_Code, 
Number : INTEGER; 
Symbol Char : CHAR; 


PROCEDURE INC(VAR A : INTEGER); 
(* Increment integer by one *) 
BEGIN 

A:=A+t+l1 
END;: (* INC *) 


PROCEDURE Upcase Str(VAR S : LSTRING): 
(* Convert string to upercase *) 
VAR I INTEGER; 
BEGIN 
FOR I := 1 TO Length(S) DO 
S{I] := Upcase(S[I]); 


END; (* Upcase Str *) 


FUNCTION Extract _Number (Line : LSTRING; Skip : INTEGER) INTEGER; 
(* Function to extract an integer from a text line *) 


VAR J, SUM : INTEGER; 
BEGIN 
IF Skip > 0 THEN Delete (Line,1,Skip):; 
(* Remove blanks *) 
WHILE Line{1} = ' ' DO 
Delete(Line,1,1); 
(* END WHILE *) 
SUM := 0; 
J := 1; 
WHILE (J <= Length(Line)) AND (Line[J]) IN [‘'O'. 
SUM := 10 * SUM + ORD(Line[J}) - ORD('O'); 
INC (J) 
END; 


(* Remove chars from string *) 


-'9']) DO BEGIN 


Extract Number := SUM 
END; (* Extract Number *) 


FUNCTION Get Char Code(S : LSTRING) : INTEGER: 
(* Function to interpret frame symbol and return its ASCII code *) 


VAR I, ASCII Code : INTEGER; 


BEGIN 


IF S = 'ULC' THEN ASCII Code := Upper Left Corner 


ELSE IF S = 'URC' THEN ASCII _Code = Upper _ ~Right_ Corner 
ELSE IF S = 'LIC' THEN ASCII Code := Lower “Left_Corner 
ELSE IF S = 'LRC' THEN ASCII_ _Code := Lower_ _Right_Corner 
ELSE IF S = 'HLN' THEN ASCII Code := Horizontal Line 
ELSE IF S = 'VLN' THEN ASCII Code := Vertical Line 
ELSE IF S = 'CRS' THEN ASCII Code := Cross Bar 

ELSE IF S = 'LFT' THEN ASCII Code := Left Tee 

ELSE IF S = 'RTT' THEN ASCII Code := Right Tee 

ELSE IF S = 'UPT' THEN ASCII Code := Up_Tee 

ELSE IF S = 'DNT' THEN ASCII Code := Down Tee 


ELSE ASCII Code := ORD('-'); 
Get_Char Code := ASCII _Code; 
END; (* ~Get_ Char_ Code *) 


(* error value return 'A' *) 


PROCEDURE Build Screen(Line : LSTRING; 
VAR Screen Line Count : INTEGER; 
VAR Screen Line : Screen _Image) ; 
VAR I, J, K, Long, Count : INTEGER; 
Ch, Symbol : CHAR; 


Build Line, Sub String : LSTRING; 


BEGIN 
IF Length(Line) > 0 THEN BEGIN 
J 2° 13 
Long := Length(Line); 
Build Line 
Count := 0; 
WHILE J <= Long DO BEGIN 
Ch := UpCase(Line[J]); 
CASE Ch OF 
‘@' : BEGIN 


(continued on page 103) 
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STRUCTURED PROGRAMMING 


Listi NG Six (Listing continued, text begins on page 108.) 


Sub String := '!; 
FOR I := 1 TO 3 DO 
Sub String := Sub String + Line[J+I); 
J := J + 3; (* advance character pointer *) 
Symbol := CHR(Get_ Char Code(Sub String) ); 
Build Line := Build Line + Symbol: 
INC (Count) ; 
END; 
'D' ;: BEGIN (* Duplicate a frame character *) 
Sub String := Line[(J+1) + Line(J+2] + Line[J+3); 
J := J + 4; (* advance character pointer *) 
Symbol := CHR(Get_Char Code(Sub String)); 
Sub String := Line(J] + Line[J+1]; 
J = J + Ls 
K := Extract _Number(Sub String,0); 
IF (K > 0) THEN BEGIN 
Count := Count + K; 
FOR I := 1 TO K DO 
Build Line := Build Line + Symbol; 
END; (* IF *) 
END; 
‘s' ; BEGIN (* Skip # column positions *) 

Sub String := Line(J+1) + Line[J+2]; 

J := J + 2; (* advance character pointer *) 

K := Extract _Number(Sub String,0); 

IF (K > 0) THEN BEGIN 
Count := Count + K; 

FOR I := 1 TO K DO 
Build_ Line := Build Line + ' '; 
END; (* IF*) 
END; 
BEGIN (* Display text *) 

INC (J); 

WHILE (Line{J] <> ‘|*) AND (J <= Long) DO BEGIN 
Build Line := Build Line + Line[(J); 
INC(J); INC (Count) 

END; (* WHILE *) 

Count := COunt - 1; 

END; 
‘#' ; BEGIN 
Sub String := Line[{J+1] + Line[J+2]; 
J := J + 2; (* advance character pointer *) 
K := Extract _Number(Sub String,0); 
IF (K < Right Edge) AND (Count < K) THEN BEGIN 
FOR I := I TO K - Count DO 
Build Line := Build Line + ‘ '; 
Count := K; 
END; .{* IF *) 
END; 
‘v' : BEGIN (* Draw vertical edges *) 
Build Line := CHR(Vertical Line); 
FOR I := Left _Edge+1l TO Right_Edge-1 DO 
Build Line := Build Line + ' '; 


Build Line := Build Line + CHR(Vertical Line); 


END; 
‘H' : BEGIN (* Draw horizontal edge *) 
Symbol := CHR(Horizontal Line); 
FOR I := Left_Edge+l TO Right_Edge-1 DO 
Build Line := Build Line + Symbol; 
END; 
END; (* CASE *) 
INC (J); 
WHILE Line{J) = ' ' po 
END; (* FOR *) 
Screen_Line[Screen_Line_Count] 
INC (Screen_Line _Count); 
END; 
END; (* Build Screen *) 
BEGIN 


INC(J); 


:= Build Line; 


Assign(FileVar, Menu Filename) ; 
(*$I-*) Reset (FileVar); (*$1+*) 
IF (IOResult = 0) 
THEN BEGIN 
(* Initialize screen line strings *) 
FOR I := 0 TO 24 DO 
Screen_Line[I] := ‘'; 
Left_Edge := 1; 
Right _Edge := 80; 
Vertical Frames eee 
Horizontal Frames := 2; 


(* Read first line *) 
READLN(FileVar, Line); 
Upcase Str(Line); 
WHILE (NOT Eof(FileVar)) AND (Line <> 'START') DO BEGIN 
Symbol Char := Line[1); 
K := ORD (Symbol Char) ; 
IF Symbol Char IN ['R','L','H','V"] THEN BEGIN 
Number := Extract Number (Line, 1); 
IF (Error Code = 0) THEN 
CASE Symbol Char OF 
R' : Right Edge := Number; 
a : Left_Edge := Number; 
‘H' : IF (Number IN (1. -2)) THEN 
Horizontal Frames := Number; 
‘v' : IF (Number IN [1..2]) THEN 
Vertical Frames := Number; 
END; (* CASE *) 
END; (* IF *) 
(* Read next line *) 
READLN(FileVar, Line); 
END; (* WHILE *) 


(* Check edges *) 

IF (Right_Edge - Left Edge) <= 4 THEN BEGIN 
Left Edge := 1: 
Right_Edge := 80; 

END; (* IF *) 


Frame Code := 10 * Horizontal Frames + Vertical Frames; 

(* Select frame type *) 

CASE Frame Code OF 

11 : BEGIN 

Upper _ Left Corner := 218; 
Upper_Right_Corner := 191; 
Lower _Left Corner := 192; 
Lower “Right _ Corner := 217; 
Horizontal Line := 196; 
Vertical Line := 179; 
Cross Bar := 197; 
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Left Tee := 195; 
Right Tee := 180; 
Up _ Tee := 193; 
Down_Tee := 194; 
END; 
12 : BEGIN 
Upper_Left Corner := 214; 
Upper Right _ Corner := 183; 
Lower_ _Left Corner := 211; 
Lower Right_ Cover := 189; 
Horizontal Line := 196; 
Vertical Line := 186; 
Cross Bar := 215; 
Left Tee := 199; 
Right_Tee := 182; 
Up_Tee := 208; 
Down_Tee := 210; 
END; 
21 : BEGIN 
Upper_Left Corner := 213; 
Upper _Right_Corner := 184; 
Lower Left Corner := 212; 
Lower Right Corner := 190; 
Horizontal Line := 205; 
Vertical Line := 179; 
Cross Bar := 216; 
Left Tee := 198; 
Right_Tee := 181; 
Up_ Tee := 207; 
Down _ Tee := 209; 
END; 
22 : BEGIN 
Upper_Left_ Corner := 201; 


Upper Right Corner := 187; 
Lower Left Corner := 200; 
Lower Right Corner := 188; 
Horizontal Line := 205; 
Vertical Line := 186; 
Cross Bar := 206; 
Left Tee := 204; 
Right_Tee := 185; 
Up_Tee := 202; 
Down_Tee := 203; 
END; 
END; (* CASE *) 


Screen_Line Count := 0; 
Shift Col := 0; 
Shift_Row : s= O; 
(* Read next line that may contain row/column offset *) 
FOR I := 1 TO 2 DO BEGIN 
READLN (FileVar, Line); 
Upcase Str(Line); 
IF Pos('SHIFTROW', Line) > 0 THEN BEGIN 
Shift Row := Extract _Number (Line, 8) ; 
IF Error _code > 0 THEN Shift _Row := 0; 
END 
ELSE IF Pos('SHIFTCOL',Line) > 0 THEN BEGIN 
Shift_Col := Extract _Number (Line, 8) ; 
IF Error “code > 0 THEN Shift _Col := 0; 
END 


ELSE Build Screen(Line, Screen_Line Count, Screen | Line); 
END; (* FOR *) 


WHILE NOT EOF(FileVar) AND (Screen _ Line ; Count < 25) DO BEGIN 
READLN (FileVar, Line); 
Build Screen(Line, Screen _Line Count, Screen _ Line); 
END; (* WHILE *) 
Screen Line Count := Screen_ Line ; Count = 1; 
Close(FilevVar); 
END 
ELSE BEGIN 
WRITE (*G*G); 
Halt; 
END; 
END; (* Read Menu *) 


PROCEDURE DISP_STR(S : LSTRING; Row, Col : INTEGER); 
(* Procedure to write a string to the screen memory *) 


TYPE SCREEN80 = ARRAY [1..25,1..80,1..2] OF CHAR; 


VAR MONODISP : SCREEN80 Absolute $B000:0000; 
COLODISP : SCREEN80 Absolute $B800:0000; 
I, J, Mode : INTEGER; 


BEGIN 
J := Length(S);: 
Mode := MEM($0040:$0049); 
IF Mode IN [2..3] THEN 
FOR I := 1 TO J DO 


COLODISP [Row,Col + I - 1,1) := S[I]; 
IF Mode = 7 THEN 
FOR I := 1 TO J DO 
MONCDISP [Row,Col + I -1,1]) := S[{I); 


END; (* DISP_STR *) 


PROCEDURE Show Menu(VAR Shift Row, Shift Col, Screen_Line Count : INTEGER; 
VAR Screen_Line : Screen_Image); 
VAR I : INTEGER; 
BEGIN 
FOR I := 0 TO Screen Line Count DO 
DISP _STR (Screen _Line[I], (I+Shift _Rowt1l), (1+Shift_Col)); 
END; (* Show Menu *) 
(* see eee ee wee wee oe we ww wee we es ee ome ee ee Owe we ee @ ew we Ow we ow ww we oe we eee oe «) 
BEGIN (*-------------- MAIN ---------------- *) 
Cirscr: 


WRITE('Enter filename '); READLN(MenuFile); WRITELN;: 
Read Menu(MenuFile, Shift Row, Shift Col, 

Screen Line Count, Screen _Line); 
Show Menu (Shift _Row, Shift _Col, Screen _ Line_Count, 
REPEAT UNTIL KeyPressed; 


END. End Listings 


Screen_Line); 


103 


COLUMNS 


Critical Error Handling 
I n the July 1986 16-Bit Toolbox col- 
umn, I quoted a letter stating that 
Computer Innovations’ C compiler, 
Version 1.31, has been placed in the 
public domain. This was and is com- 
pletely incorrect, and although a re- 
traction has already been printed 
elsewhere in DDJ, I wish to apologize 
to Computer Innovations for publish- 
ing this letter without checking the 
facts—major league stupidity on my 
part. 


Comparing Strings 

As the October column included two 
listings of 8086 string searching rou- 
tines, I thought I'd continue the trend 
this month with 8086- and 68000- 
based string comparison routines 
(Listings One and Two, page 86). 
These procedures work very much 
like the strcmp library function in C 
does and return flags indicating 
whether the first string is less than, 
equal to, or greater than the second 
string. The routines are not com- 
pletely symmetrical but do indicate 
how the 8086's special string instruc- 
tions can provide a considerable 
space and speed advantage over the 
68000's in some situations. 


Changing the Master 
Environment 

The October 1986 16-Bit Toolbox col- 
umn included a brief introduction to 
environment blocks under MS-DOS, 
and at that time I promised to discuss 
several different ways to change the 
master environment block from an 
executing program. After consider- 
ing the matter further, I have decid- 
ed to break that promise, and this 
month I will present only one meth- 


by Ray Duncan 


od (which I feel to be the safest and 
most portable). 

MS-DOS has an undocumented en- 
try point, software interrupt 2eh, 
which is called with registers ds:si 
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pointing to a command string in the 
form of a count byte, followed by As- 
Cll text, followed by a carriage return 
(which is not included in the count). 
This entry point appears to be a sort 
of back door to the command inter- 
preter buried in COMMAND.COM, and 
if you pass it a string of the form set 
name=parameter, you will find that 
the system’s master environment 
block will be modified rather than 
just your program's local environ- 
ment block. 

Although int 2eh is not discussed in 
any Microsoft reference or docu- 
mentation I have seen (even the OEM 
adaptation guide or the new MS-DOS 
Technical Reference Encyclopedia), it 
seems to be present and work the 
Same way in all PC-DOS/MS-DOS ver- 
sions 2.0 through 3.2. Because Micro- 
soft is now clearly focusing its operat- 
ing system efforts on 80286-based 
protected mode versions of DOS, I sus- 
pect that the 8086/88-based versions 2 
and 3 of DOS are going to become fair- 
ly static (except perhaps for bug 
fixes). Therefore, it should be safe to 
build calls to int 2eh into your applica- 
tion software for these DOS versions. 

I have two listings this month to il- 
lustrate the use of int 2eh. The first 
(Listing Three, page 86) is from David 
Gwillim in Los Angeles and is in the 
form of a small macro assembler COM 
program. David has contributed 
many other interesting and useful 
utilities to bulletin boards in the Los 
Angeles area. The second example 
(Listing Four, page 88) is from Dan 
Lewis of Key Software Products, in 
Menlo Park, California, who contrib- 
uted a (DeSmet) C routine called Set 
—Var that demonstrates use of the un- 
documented int 2eh function to 
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change the master environment 
block. Dan is an associate professor of 
computer science at Santa Clara 
University. 


File Handles 
Ross Nelson of San Jose writes: “I have 
been following the file handles/redi- 
rection letters in your column, and I 
have an observation that you may 
find interesting. Although it seems 
like the DUP and FDUP functions (int 
21h, functions 45h and 46h, respective- 
ly) are tailor-made for redirection 
(and I wouldn't be surprised if that is 
the approach Unix uses), that is not 
the method MS-DOS uses internally. I 
have included the C code for a routine 
called STD.C that emulates the method 
COMMAND.COM uses to do redirection 
(at least, this method was used in MS- 
DOS, Version 3.0, last time I checked). 

‘MS-DOS apparently keeps a set of 
‘actual’ handles deep in the bowels of 
the operating system, with reference 
counts and so on. Each ‘task’ gets its 
own set of ‘virtual’ handles, which al- 
ways begin with handle 0. The virtu- 
al-to-actual translation table is held in 
the program segment prefix for each 
task. The code I am supplying was 
written before I saw your May col- 
umn, which pointed out that the ta- 
ble doesn't have to reside there be- 
cause there is a pointer and a count in 
the PSP that points to the actual table. 
Anyway, when you issue a redirec- 
tion command to COMMAND.COM, it 
doesn’t bother with DUP and FDUP, it 
just mucks with the virtual-to-actual 
table in the PSP of the task that will 
run with redirection.” 

Ross’ program accompanies this 
month’s column as Listing Five, page 
Si. 


File-name Wildcards 

Randy Langer, of MicroSphere Tech- 
nology in Chico, California, writes: “I 
am sending you an assembly-lan- 
guage C function [Listing Six, page 92] 
that performs wildcard file-name ex- 
pansion under MS-DOS 2.x. Adapted 
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from the documentation presented 
by Peter Norton [The Programmer’s 
Guide to the IBM PC (Redmond, 
Wash.: Microsoft Press, 1985)], this 
function supplies a solution to a com- 
mon problem in writing operating 
system utilities. 

“To use this function, the user first 
defines a structure as typedefed in 
wildcard.h [Listing Seven, page 94]. 
Then, for each filespec to be expand- 
ed, the user copies a pointer to the 
filespec into the structure and initial- 
izes the flag member to 0. There- 
upon, the user repeatedly calls wild- 
card(), passing a pointer to the 
structure defined for this purpose. 
The function call will either return a 
pointer to the structure’s filename 
member or NULL if no more match- 
ing file names exist. The example 
shown in wildtest.c [Listing Eight, 
page 94] will clarify this. 

‘Assuming the function returns 
the file-name pointer, other data re- 
garding the file are also available 
from the call. The structure member 
f_atts contains the ‘attributes’ of the 
file (read-only, subdirectory, and so 
on; see Norton, page 116). The mem- 
ber datetime contains the file’s time/ 
date stamp in a format that is compa- 
table with the Aztec C time library 
functions. The filesize member con- 
tains what its name suggests. The fi- 
nal member, tempdata, contains link 
data for subsequent search next calls, 
so keep yer mitts offa it. 

“It should be noted that the re- 
turned file name does not include the 
drive/path involved; this must be di- 


vined from the file spec. The algo-— 


rithm in wildtest.c shows a method 
for doing this.” 


New Books to Buy 

Strauss, Edmund. Inside the 80286. 
New York: Brady Communications 
Co., 1986. 

Edmund Strauss is a senior applica- 
tion marketing engineer for the 80286 
microprocessor and clearly knows his 
stuff. This book is a very lucid presen- 
tation of the special features of the 
80286, including its additional regis- 
ters and instructions, protected virtu- 
al-addressing modes, task switching, 
and privilege levels. The book in- 
cludes many excellent diagrams and 
several lengthy and well-commented 
assembly-language programming ex- 
amples, and it even finishes up with 
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The Advanced Programmer's Editor 
That Doesn't Waste Your Time 


Fast, EMACS-style commands—completely reconfigurable 
Run other programs without stopping Epsilon—concurrently! 
C Language support—fix errors while your compiler runs 
Powerful extension language _e Great on-line help system 
Multiple windows, files e Regular Expression search 
Unlimited file size, line length e Supports large displays 
30 day money-back guarantee e Not copy protected 


Only $195 
LUgar*u 


Software Ltd. 


5740 Darlington Road 


Pittsburgh, PA 15217 for IBM PC/XT/AT’s or compatibles 


Circle no. 135 on reader service card. 


pelt A Lede labels 







HARVEST THE KORN 


Over 70 programs bringing elements of UNIX System V.2 to the 
world of DOS. Our tools enhance your efficiency on machines 
like AT&T 6300, IBM PC, XT, AT and compatibles. We offer: 


shell — Korn shell compatible — combines best features of 
Bourne & C shells 
vi — a detailed implementation of the UNIX full-screen editor 


awk — the only commercially-available version offering Bell Lab’s latest 
published specs 


cat chmod cmp comm cp cpio ctags cut date 
dd dev df diff du echo ed egrep __ fgrep 
file find head help join Ic Is more mv 
nm od paste pg prof pwd rm sed size 
sort split Strings _ tail time touch tr uniq wc 


and much, much more... 


Programs come with complete UNIX-style command-line file name expansion and are not 
copy protected. Phone support 9-6 EST. Full documentation is included. 


Mortice Kern Systems Inc. 
43 Bridgeport Rd. E., Waterloo, Ontario N2J 2)4 


(519) 884-2251 


Price: $139.00 


For information or ordering call collect: 


MasterCard & Visa orders accepted. OEM & dealer inquiries invited. 
UNIX is a trademark of Bell Labs. MS-DOS is a trademark of Microsoft Corp. 


STREAMLINE YOUR PROGRAMMING 


Circle no. 249 on reader service card. 
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At last! - 


Fast, On-screen 


FLOWCHARTS 


Finally! An on-screen flowchart proc- 
essor that knows about flowcharts - not 
just another “screen draw” program that 
makes you do most of the work. 


Interactive EasyFlow is a powerful 
full-screen graphics program dedicated 
to flowcharts and organization charts. 
With this program you can quickly com- 
pose charts on the screen. More im- 
portant, you can easily modify charts so 
they are always up to date. 


Features: e Text is automatically 
centered, character by character, within 
shapes as you type it @ Text formatting 
controls allow you to over-ride the auto- 
matic formating where desired @ Lines 
are created by specifying the starting 
and ending points - the program auto- 
matically generates the route @ Cut and 
paste facility allows arbitrary chart 
fragments to be moved, copied rotated, 
reflected or sent to/from disk @ Shape 
insert-delete and row/column insert- 
delete e Charts can be up to 417 
characters wide by 225 lines high. 
Charts too wide for the printer are auto- 
matically printed in strips. @ Charts can 
be larger than the screen - the window 
into the chart scrolls both horizontally 
and vertically as necessary @ Works 
with many popular matrix printers in- 
cluding Epson, IBM graphics printer and 
compatibles. Full support for HP 
LaserJet and LaserJet Plus. Works with 


STATUS BAR (not to be 
confused with a wet bar) tells 
you what Interactive EasyFlow 
is doing at all times. 






ADDY ae kn 


TEXT/MESSAGE 
WINDOW used to enter 
user text and to display 
messages from Interactive 
EasyFlow. 


CURRENT SHAPE 
WINDOW - shows the 
content of the current 
flowchart shape (the one 
under the SHAPE 
CURSOR) in complete 
detail. 


so2 5 
% anes valid 





HavenTree Software Limited 

P.O. Box 1093-B 

Thousand Island Park, NY 13692 
Information: (613)544-6035 ext 26 
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HP 7475A (& compatible) plotters. Can 
be used with ANY printer when non- 
graphic (character) output is acceptable 
@ All standard flowcharting shapes in- 
cluded @ Most shapes supplied in large, 


“medium and small sizes @ Extensive 


manual (100+ pages) includes many 
examples @ Context sensitive “help” 
facility provides immediate assistance at 
any time @ Any number of titles can be 
placed on a chart © Commentary text 
blocks can be placed anywhere in the 
chart @ Fast: written in assembly lan- 
guage @ Plus many more features than 
we can mention here 


Requires at least 320K memory, DOS-2 
or higher and an IBM or Hercules com- 
patible graphics card. On EGA, full 
640x350 resolution is used. 


Order direct for only $149.95 + $2.00 
S&H (USA/Canada), $10.00 (foreign). 
Payment by MO, check, VISA, 
MasterCard, COD or Company PO. 
Rush orders accepted ($15.00 S&H; 
USA/Canada only). Rush orders re- 
ceived by noon will be delivered the next 
business day (to most locations). 


1-800-267-0668 


The sample screen display shown below is typical of 
what you see while editing a chart. Other screen dis- 
plays are provided for entering titles, changing 
options, getting “help” and so on. 


Order Desk: 


CHART WINDOW gives an overview of your chart; this 
example shows the “normal” view. “Close-up” view shows a 
smaller part of the chart in more detail. “Wide-angle” view 
shows a larger part of the chart at reduced size. 





SHAPE CURSOR shows where you are in 
the chart. Cursor keys move it around; chart 
window scrolls if you run off the edge of the 
window. 


Circle no. 176 on reader service card. 








46-BIT 
(continued from page 105) 


schematics and instructions to build 
your own small 80286-based system— 
highly recommended. 


Concurrent DOS 

Henry Velick of Monsey, New York, 
writes: “After reading your July col- 
umn, and Mr. Mullan’s contributions 
in particular, here are a few thoughts 
to add to the raging Concurrent PC- 
DOS controversy. The first is a ques- 
tion: how many useful (usable, well- 
used, common, and so on) PC 
programs will support a dumb ASCII 
terminal? Answer: not too many. As 
far as I know, most of the big-selling 
business programs, such as Lotus 1-2- 
3, GBASE III, Microsoft Word, and 
Crosstalk, are inextricably tied to the 
PC keyboard and display adapters. 
How useful, then, can a multiuser 
system be that supports only one key- 
board/display, no matter how many 
dumb terminals it might support? 

“There is, by the way, a reasonable 
alternative. A small company in New 
York state, called ANEX Technology, 
has some hardware/software prod- 
ucts that allow up to four users on a 
PC or PC/XT and up to eight on a PC/ 
AT. Unlike witti Concurrent PC-DOS, 
each user has full use of a genuine PC 
keyboard (or aftermarket equivalent) 
and a real PC display (MDA, CGA, Her- 
cules, Tecmar, and so on). Very few 
programs cannot run on this system. 
Those that can’t require certain hard- 
wired memory locations to be avail- 
able—most of these are games. But I 
have seen an XT with four monitors 
simultaneously running 1-2-3, a BA- 
SICA graphics demo, WordStar, and a 
screen-oriented data-entry program 
with very little degradation of per- 
formance—very impressive. 

‘‘ANEX’s products are called MPC-4 
and MPC-8 for the PC and AT, respec- 
tively. There is also a new low-end 
version called PC-ANEX that supports 
only two users. And although cer- 
tainly more expensive than a copy of 
Concurrent PC-DOS, they are also a 
good deal cheaper than the addition- 
al PCs. No, I don’t work for ANEX.”’ 


DDJ 
(Listings begin on page 86.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 6. 
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NEW 
DYNAMO DATA ENTRY 


UNIQUE, POWERFUL, NECESSARY 
Full Validation of Each Keystroke 
Range Checking 
Data Security to Item Level 
Scrollable Data Entry Forms with Fixed 
& Scrollable Parts 
Allows Forms Larger Than Screen 
Over 34 Item Types 
Powertul ‘‘Picture’’ Capability 
Unique: Mix Text, Data Entry Fields 

With Menu Items 
Full source code. No Royalties 
Code plus manual 


POWER WINDOWS 


MOST POWERFUL YET 
POP-UP WINDOWS FOR 
Menus/Overlays 
Help Screens 
Messages/Alarms 
ZAP ON/OFF SCREEN 
FILE-WINDOW MANAGEMENT 
COMPLETE CONTROL OF: 
Cursor 
Attributes 
Borders 
AUTOMATIC 
Horizontal & Vertical Scrolling 
Word Wrap 

Line Insertion 
The most powertul, flexible and easy 
to use windowing package available! 
Many types of menus. Highlighting. 
Move data between files, keyboard, 
program and windows. Status lines. 
Change size/location/overlapping. 
Move/add/delete/cascade windows. 
Full source code. No royalties. 
3 disks 


C FUNCTION LIBRARY 


BEST YOU CAN GET 
325 FUNCTIONS 
SUPERB DOCUMENTATION 
Most complete screen handling plus 
graphicscursrsor/keyboarad/data entry, 
72 string functions with word wrap; 
status andcontrol; utility/DOS BIOS/ 
time/date functions; printer control & 
more. Special functions. Full source 
code. No royalties. 
4 disks 


$129.95 


$129.95 


$129.95 


tTM AT&T 


C DYNAMO 


FREE! UNIX' WORKALIKE FREE! 


(See Limited Time Special Offer Below) 


PAINT TEXT, HELR MENU & DATA ENTRY SCREENS & WIN- 
DOWS FROM KEYBOARD ¢ COMPLETE INPUT FORMATTING 
e FULL VALIDATION ¢ UNLIMITED WINDOWS ¢ AUTOMATIC 
WINDOW OVERLAY & RESTORE ¢ FULL ATTRIBUTE CON- 
TROL & HIGHLIGHTING ¢ 1-2-3 LIKE MENUS * DRAW BOXES 
& BORDERS ¢ GENERATE '‘C” CODE WITH TOUCH OF A KEY 


e LEFT/RIGHT/CENTER JUSTIFICATION ¢ SPECIFY ANY FILL 


NEW 
DYNAMO SCREEN 
PAINTER 
AND FORMS CREATOR 


DOES IT ALL 
RIGHT FROM YOUR KEYBOARD 
AUTOMATIC CODE GENERATION 
Data or Help Screens & Windows 
Data Entry Screens & Windows 
Menus 
FAST, FLEXIBLE, EASY 
Save Man-Months of Programming 
Full Control of Screen Attributes 
Monochrome or Color 
by Form, Screen, Window or Item 
FAST EASY MENU GENERATION 
1-2-3 Like, Many Others 
Full Read/Write Security by Item 
Requires Dynamo Data Entry 


Screen painter & manual $129.95 


B-TREE LIBRARY 
& ISAM DRIVER 


POWERFUL DATA MANAGER 
Fixed/Variable length records 
Fast! Easy To Use! 

76.7 Million Records/File 
16.7 Million Keys/File 


Full source. No royalties. $129.95 
MAKE Utility (Snake) $59.95 
SUPERFONTS FOR C 


Super Size Characters 
Monochrome adapter 
Color/graphics adapter 
8 Font Libraries 


Font and Function Library 


C-TERP 


INTERPRETER FOR C 
No Compromise, Full K&R 
Built In Screen Editor 
Fast, Fast Compile/Link 
Use External Libraries! 
Symbolic Debugging 
Single Stepping 
Rave Reviews! 
2 disks and manual 


$49.95 


$299.95 


CHARACTER & CURRENCY SYMBOL ® U.S./EUROPEAN 
NUMBER STYLES e MORE DATA TYPES ¢ ONE CALL WILL 
OPERATE ENTIRE SYSTEM # SUPPORTS IBM PC/XT/AT & 
COMPATIBLES * SUPPORTS MICROSOFT, COMPILER LAT- 
TICE, AZTEC, Cl86, ANY FULL K & R OR ANSI] COMPILER 


COMBINE AND SAVE! 


SCREEN PAINTER + DATA ENTRY 
BOTH for ay Pe, ee ie co $179.95 


A $260 VALUE) 


C LIBRARY plus POWER WINDOWS 
Bt 1OF ONY ies es bea Ped $179.95 
+ SUPERFONTS FOR 'C...:.. $199.95 


(A $310 VALUE) 


C BUSINESS LIBRARY 
INCLUDES C FUNCTION LIBRARY, POWER WINDOWS, 
SUPERFONTS FOR C, B-TREE LIBRARY, ISAM 


Pehle FON 5 2 ona ence ae ae $299.95 
(A $440 VALUE + FREE UNIX WORKALIKE) 
C TOTAL LIBRARY 


INCLUDES C FUNCTION LIBRARY, POWER WINDOWS, 
SUPERFONTS FOR C, B-TREE LIBRARY, ISAM and 
C-TERP C interpreter 


Wigs Ol: eaten ud eed ce at ao $499.95 
(A $740 VALUE + FREE UNIX WORKALIKE) 


C DYNAMO LIBRARY #1 
SCREEN PAINTER, DYNAMO DATA ENTRY, POWER 
WINDOWS, C FUNCTION LIBRARY, SUPERFONTS for C 


BES IGT ook ok yaila ce aes a deo $249.95 


(A $570 VALUE) 


C DYNAMO LIBRARY #2 


ALL OF C DYNAMO LIBRARY #1 


PLUS B-TREE &ISAM....... $349.95 
(A $700 VALUE + FREE UNIX WORKALIKE) 


C DYNAMO LIBRARY #3 


ALL OF C DYNAMO LIBRARY #2 


PLUS Cites 05 bein as $549.95 


(A $1000 VALUE + FREE UNIX WORKALIKE) 


**FREE PC UNIX, PCVMS OR O/S TOOL BOX WITH ANY 
PURCHASE OVER $295.00 LIMIT ONE PER CUSTOMER 


Offer expires 12/31/86 


SPECIAL OFFER 


OPERATING SYSTEMS 
Multi-User Multi-Tasking Networking, Full Source 


LIST 
PCNX™ UNIX WORKALIKE $99 PAEE* 
PCVMS™ 99 FHEE" 
O/S TOOL BOX™ (Build your 
own operating system) 99 FREE” 


™WENDIN SOFTWARE 
*with purchase of any Entelekon combination 
library priced at $295 or more. 
Limit 1 Special Offer item per customer. 
Offer expires 12/31/86 


THE C DYNAMO FAMILY ...C TOOLS THAT WORK TOGETHER 


Entcickon 


12118 Kimberley, Houston, TX 77024 


Circle no. 173 on reader service card. 


713-468-4412 
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COLUMNS 


STRUCTURED PROGRAMMING 


Turbo Pascal Procedural Parameters, Local Modules in Modula-2 


n this issue, I will discuss imple- 

menting procedural parameters 
in Turbo Pascal, local modules in Mo- 
dula-2, and two methods for modify- 
ing menus of an application program 
without editing it. 


Procedural Parameters 
Turbo Pascal does not support proce- 
dural parameters. Procedural pa- 
rameters enable programmers to 
write applications that can easily em- 
ploy alternate methods. For exam- 
ple, a program sorting several re- 
cords can examine the size of the 
data and determine which sorting 
method to use. If there are few re- 
cords, a bubble sort is applied; for a 
moderate number of records, the 
Shell-Metzner sorting method is 
used; and for a large data set, quick- 
sort is employed. 

Mike Babulic, of Calgary, Canada, 
has implemented procedural param- 
eters; he offers three versions that dif- 
fer in speed and reliance on Pascal 
and machine language. You can 
download them from the Borland SIG 
on CompuServe, where they are 
stored as an archive file. You will 
need the DEARC.PAS utility, available 
in the same SIG, to unpack all Mike's 
files. 

The archive file contains six files: 


1. ProcParm.PAS—Mike’s documen- 
tation with his example program. 

2. ProcParm.INC—Contains the call 
_ProcParm procedure. 

3. ProcParm.QK—In-line code to be 
used instead of the call_ProcParm 
procedure. Quicker execution, but 
larger programs. 


by Namir Clement 
Shammas 


4. ProcParm.BIN—The third (and best) 
alternative, an externally assembled 
binary file. It is noted for fastest exe- 
cution speed because of less stack ma- 
nipulation and the least code added 
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to the program (12 bytes!). 

5. ProcParm.P—This is the “‘glue”’ 
that you include in a program so it 
can use ProcParm.BIN. 

6. ProcParm.ASM—The source code 
for ProcParm.BIN. 


96) includes that for the first two 
methods only. 

The three versions to implement 
procedural parameters are: 


1. The call_ProcParm procedure— 
This procedure is written in Turbo 


Pascal with no in-line code. When | 


call_ProcParm is called by a proce- 
dure or function, it causes a short 
jump to the procedure whose offset 
is the last parameter of the calling 
procedure. This is done by swapping 
the last parameter, a pointer to a pro- 
cedure, and the return address of the 
calling routine on the stack. 

Using call_ProcParm, procedures 
are passed as parameters to other 
procedures. This is accomplished by 
defining a dummy procedure or 
function with exactly the same argu- 
ments as the procedure to be passed, 
except that a final added integer-type 
parameter is also defined. When the 
calling procedure invokes the dum- 
my procedure, it passes the offset of 
the procedure to be executed in this 
last parameter. The Ofs function is 
frequently used for this purpose. 


ProcParm returns to the routine | 


specified by the last parameter of the 
dummy routine, and the stack will 
look exactly the same as if the ‘‘re- 
turned to’ procedure had been 
called by the procedure that called 








the dummy one. 
2. The in-line code methed (Proc- 
Parm.OK)—You can include the Proc- 
Parm.OK file in your dummy proce- 
dure instead of calling the ProcParm 
procedure. This speeds up a program 
because fewer 8088 instructions are 
executed for jumping to the passed 
procedure. Be aware, however, that 
the cost of this speed is a larger 
program. 

The ProcPtr type need not be de- 
clared if you use ProcParm.OK—the 


| integer type is employed instead. 

| 3. ProcParm.BIN and ProcParm.P— 
The source code accompanying this | 
column (Listings One and Two, page | 


The ProcParm.P file is included in 
your program to allow it to use the 
contents of the ProcParm.BIN file. As 
in the previous two methods, a dum- 
my procedure is created with the pro- 
cedure to be run as the last parameter. 
This is where the similarity ends. 

ProcParm.P allows you to call FAR 
procedures and functions that lie out- 
side the body of the program. In addi- 
tion, it allows your programs to call 
procedures and functions in the body 
of your Turbo program (NEAR calls). 

You can also make a FAR call with 
an offset. This is useful if you have set 
aside an area of storage for a group of 
procedures or functions. The method 
used is quite a bit slower than the stan- 
dard FAR call. If speed is important, 
you should save the address of each 
procedure in a variable and use the 
regular FAR call. Mike has included a 
function to make life easier for you. 

One problem with the FAR calls that 
Mike hasn't been able to solve yet is 
that you can't make them from inside 
the Turbo environment. You have to 
create a .COM file and execute that. If 
anyone comes up with a workable so- 
lution, please let Mike know. 


Listing Three, page 96, shows an ex- 
ample I wrote using the first two 
methods. The program creates an or- 
dered array of integers and reverses 
their order. In each method I have 
used the Shell sort and quicksort tech- 
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niques. The sample program also in- 
corporates a routine to report the 
time at the beginning and end of a 
sorting method. This should give you 
a feel for the speed of each of Mike’s 
routines. 


Local Modules in Modula-2 
The Modula-2 language supports lo- 
cal modules, a valuable feature that 
has received little attention. Local 
modules are modules that are nested 
inside others. Their interface with 
the parent module is established us- 
ing import and export lists. The inter- 
face of local modules is very strict— 


for example, if the local module | 


needs to write a string to the screen, it 
must explicitly import the Write- 
String procedure from the parent 
module. This clearly differs from the 
interface of ordinary Modula-2 pro- 
cedures. The export lists contains all 
the items exported by the local 
module. 

The advantages of local modules 
are twofold. First, the variables used 
in local modules are static; their val- 
ues are retained between calls to the 
local modules. The second advantage 
is that local modules can initialize 
their static variables. This is done 
once, the first time the local module 
is called. 

The advantage of using local mod- 
ules, especially within library mod- 
ules, is to hide some details concern- 
ing intermediate variables involved 
in certain calculations. One example, 
often mentioned in Modula-2 text- 
books, is the generation of random 
numbers. The local module responsi- 
ble for returning a random number 
is assigned the task of initializing the 
seed value. Its value is preserved by a 
local static variable between calls to 
the local module. 

Listing Four, page 97, shows an ex- 
ample of using a local module inside 
a library module. The library module 
BestFit provides routines for a linear 
regression between two arrays, X 
and Y. The module exports functions 
that return the slope, intercept, and 
coefficient of determination statis- 
tics. The local module InnerWorking 
initializes the statistical summations, 
contains the Regression procedure to 
update them with data, and calcu- 
lates intermediate results. The vari- 
ables within the local module are 
both static and invisible to an applica- 
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tion program employing module 
BestFit. This gives more of a black- 
box effect, in which intermediate 
data is retained by the library mod- 
ule and the final results are passed 
back to the calling application. 

Local modules and their static vari- 
ables can be used in a variety of other 
applications. A library module, for ex- 
ample, manipulates a stack of items 
and protects it from corruption. Pro- 
cedures and functions are used to 
push, pop, rotate, and swap data 
items in the stack. The application 
program performs data transfer with 


static variables in the library module. 


Modifying Menus Without 
Program Editing 

Menus are employed in ‘‘friendly”’ 
application programs. Aesthetically 
appealing menus are placed in sin- 
gle- or double-line frames using ex- 
tended ASCII characters. Normally, 
these programs contain the code for 
the menus. This means that if you 
want to alter the menu text, you must 
edit and recompile the source code. 
An alternative method is to store the 
menu text in a separate file. At run 


Do You Ever Get the Feeling 
That No One Speaks Your Language? 


Arity/Prolog. 
The Language That Spans the Generation Gap. 


Arity listens to what you ask for. You want a serious, versatile 


guage that will go the distance for you. There are two very 


Jod'reasons for you to use Prolog—to do your work smarter 
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with several other programming languages and 
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Speak it freely Our products are not copy protected and we 
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applications as you'd like. Why keep the language of solutions’ 


all to yourself? 


Join the thousands of assembly and C programmers who 
already use Arity/Prolog —the language of solutions. 
Call 1-800-PC-ARITY Today. 

Massachusetts residents call 617-371-1243. 


Software that roars. 


ARITY CORPORATION 
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SCREEN/APPLICATION GENERATOR 
BE 3 to 6 TIMES MORE PRODUCTIVE 
For $9595 receive 6 Floppy Disks & Manual. DDJ Special: $69.95 


TURBO ISAM MASTER 


TURBO MASTER helps you develop 
your functional specs and then allows 
you to QUICKLY prototype a validation 
model of your system. TURBO MASTER 
can then generate a super-fast Turbo 
Pascal Program that features advanced 
screen input and control, a professional 
control menu, and database functions. 


e MASTER DATABASE PROGRAM - Generates 


Pascal Program Code for the following functions 
—Add a Record - Allows both duplicate & 
unique only keys. Change the up to 48 fields 
comprising the primary key and the up to 7 
secondary keys at any time during input, and 
the validity of the keys are checked and the 
ISAM key files are automatically adjusted. 
—Delete a Record - Shows the record to be 
deleted on the screen and allows you to 
change your mind about deleting, and then 
adjusts the keys files automatically for the up 
to 8 keys. The disk space is reused 
automatically by the programs. 
—Edit a Record - with a key change allowed. 
—Search Database by Key - The ability to 
display the keys on the screen or printer in 
sorted order. 
DATA BASE RECOVERY PROGRAM. This 
program recovers your database if it corrupted 
by a power outage or certain hardware failures. 
MULTIPLE ISAM FILES - Can be used at the 
same time in a single program. The generator 
also produces context sensitive instructions on 
how to integrate the generated program into 
your main program. 
DOCUMENTATION - Print screens and ISAM 
specifications. Also inline program documenta- 
tion is generated. 


TURBO MENU MASTER 

GENERATES ‘Ready to Run’ Turbo Programs 
with Dedicated Screens or Windows. 

e FEATURES: Has Menu Data Base so it’s easy 


to modify menus. 

PROVIDES SELECTION BY: 

—Press of a number 

—Press of a function key 

—Press the high lighted letter 

—Use the arrow keys 

ADAPTIVE SCREEN COLORS — Different 

screen colors are automatically used for color or 

monochrome display. This allows you to provide 

a better interface for the user. 

INTERACTIVE MENU BUILDER 

—Allows for the automatic entry and reorder of 
selections 

—Offers easy color selection 

—Allows for choice of procedure, chain, ex- 
ecute or comment code generation for each 
selection 

—Has startup Menu that YOU design. 

—Provides for the integrated Display and con- 
trol of the Key Lock Status. 


TURBO RESIDENT SCREEN CAPTURE 


which allows you 


to capture Text 


Screens from any running program. 
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TURBO 


TURBO SCREEN MASTER 


GENERATES ‘Ready to Run’ Mulit-screen pro- 
grams with advanced field definition. 


USER SPECIFIED PROCEDURES can be call- 
ed before and after data entry for each field. 
This allows SCREEN GENERATION THAT I$ 
INDEPENDENT OF USER INSERTED PRO- 
GRAM STATEMENTS. 

YOU CAN CUSTOM PROGRAM special field 
edits and processes which Screen Master 
automatically includes into the screen program. 
This allows for ‘On the Fly FUNCTION KEY 
AND WINDOW ROUTINES. 

RECORD FORMATS and initialization routines 
for Structures and Arrays are automatically 
generated. 

CAN SPECIFY a Protected Field to be automatically 
redisplayed if its value changes. 
TYPES INCLUDE Strings, 
Male/Female and Numbers. 
FIELDS CAN BE STORED (declared) as 
Boolean, Integer, Real, Character, or String. 


Yes/No, Time, 


COMPARISON WITH 
OTHER PRODUCTS 


TURBO SCREEN 
SCREEN SCULPTURE 
MASTER Ver - 1.01 


Full support for structures, arrays 
and Declarations specifications 

Full support for user written pro- 
cedures, function keys & help 
screens 

Etch-A-Sketch Border Drawings 

Point and Paint color interaction 

Border color control 

User defined valid character sets 

Display of Caps/Num Lock Status 

Optional realtime initialization of 
data/time ; 


YES 





TURBO RESIDENT ISAM 
Replaces Borland’s Toolbox ISAM method 


Eliminates 8k of code space that Borland’s Tur- 
bo Toolbox ISAM requires in your program. 
Puts the Key Buffer Data Area outside of your 
program’s data space. 

Speeds Compling 

Eliminates errors caused by inconsistant ISAM 
specifications between ISAM files. 

Increases program loading time. 

Reduces object program size. 

Offers SUPER-FAST record creation and 
lookup. For example, it can CREATE over 20 
single key records PER SECOND on an IBM AT 
running at a 9 meg clock rate. 


OUR USERS REPORT 


A i A An A i A en a 


“Since Fall of 85, | have generated over 300 pro- 
gram modules with it and find it to be just what | 
needed. Most of all the modules represent 5000 
to 8000 lines of Pascal Code’’ Oner Systems 
“By being able to produce a 21 screen and 
menu control demo so quickly helped me obtain 
the contract.” 

“Speeded up my screen development by 6 
times’’ Elexor Associates. 

“Has many of the features of the Super Mini 
development tools costing $10,000.”" Applied 
Micro Systems. 

‘‘We developed 3 Vertical Market Applications in 
the 6 months we had your system.” Absolute 
Systems. 
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» BTRIEVE INTERFACE MODULE x 


*% Allows full multiuser record locking and * 
a Automatic file recovery for the industry’s * 
™ most popular LANs. Works with the in- * 
™ dustry’s leader of professional databases * 
» for multiuser LAN’s (optional). $99.95 * 
= Requires Btrieve by SoftCraft, Inc. * 


RRR ERE KKK KKKEK 
TURBO MASTER TOOLS 


The Turbo Toglikit Master includes procedures for 
full control over all screen attributes, advanced str- 
ing functions, automatic control of multiple help 
screens, saving and retrieving screens to RAM 
buffers, Caps/Num/Scrolli/Lock control pro- 
cedures, and report procedures. 


RISK FREE TRIAL 
Try the demo package included for 30 days. If not 
pleased return for a full refund. 

Credit Card Orders Call: 


1-800-821-9503 
In Florida (800) 342-0137 
For Other Information Call (305) 892-5686 
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NO ROYALTIES on Generated Programs 


YES, ENCLOSED IS $69.95 


For 
Turbo Master Tools 
Turbo Menu Master 
Turbo Screen Master 
Turbo ISAM Master 
Turbo Screen Capture 
Resident ISAM 


Systems Requires: |BM PC,XT,AT or 100% Compatible 
-246K MS DOS 2.0 or Higher, Turbo Pascal 3.0 - 2 DD/DS 
Disk Drives. 

US orders add $7.50 S&H All foreign orders add $15 


per product ordered. 


Name: 


Shipping Address: 


City: 

State: 

Zip 

VISA or MC #: 


Exp. Date 





C.0.D.’s will be accepted. Outside USA: make payment by 
bank draft, payable in US dollars drawn on a US bank. 

© Turbo Pascal & Turbo Database Toolbox are trademarks of 
Borland International, IBM is a trademark of International Business 
Machines. MS-DOS is a trademark of Microsoft. Btrieve is a 
trademark of Softcraft, Inc. Screen Sculpture is a trademark of the 
Software Bottling Co. of New York. © 1985 Hawaiian Village Com- 
puter Software. 


HAWAIIAN VILLAGE COMPUTER SOFTWARE 
1109 Pennsylvania Ave., St. Cloud, Florida 32769 
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ALL SALES ARE MADE SUBJECT TO THE TERMS OF OUR 90 DAY LIMITED WARRANTY. A COPY OF THIS WARRANTY IS AVAILABLE FREE, ON REQUEST. 


DIGITAL RESEARCH COMPUTERS At ara) 
TEXT TO SPEECH BOARD! HOT COMPUTER BOOKS! 











saeC AT COMPATIBLE, MAKE YOUR COMPUTER TALK! | er rie most OUT OF THE INVESTMENT YOU MADE IN YOUR 
INSTRUMENTS SPO256-AL2 SPEECH CHIP AND THE CTS256A-AL2 TEXT TO COMPUTER HARDWARE AND SOFTWARE WITH THE NEW WORDWARE 
SPEECH CONVERTER. SERIES OF COMPUTER REFERENCE AND TRAINING MANUALS. LEARN 
THIS BOARD USES ONE SLOT ON THE MOTHER- HOW TO MAKE ALL THAT EXPENSIVE SOFTWARE YOU BOUGHT REALLY 
SGANE MEAT ALSO HE USED INA STAND AL OnE COOK! BUY ANY 3: TAKE AN EXTRA 10% DISCOUNT! 
ERSRONMENT WITH ALMOST ANY COMPUTER ILLUSTRATED TURBO PASCAL ................... $13.50 
H 2 
BOARD AUDIO AMP OR MAY BE USED WITH ILLUSTRATED AUTOCAD a, Tar'iS: 0) Ose pele pa (eer etek 6) aietns ee cee $18.50 
EXTERNAL AMPS. ILLUSTRATED WORDSTAR ....................... $18.50 \ 
DEMONSTRATION SOFTWARE AND A LIBRARY BUILDING PROGRAM ARE ILLUSTRATED d BASE ll... ooh. ee i SS $13.95 E ® 
INCLUDED ON A 5% INCH PC/XT DISKETTE. FULL DOCUMENTATION AND 
SCHEMATICS ARE ALSO INCLUDED. LUSTRATCO'S BASE HE oe ii es BENE $18.50 N 
69 95 89 95 ILLUSTRATED LOTUS 9-2-3: fic cs cjecis essence del $15.50 
« * ILLUSTRATED SYMPHONY ....................05. $17.50 
COMPLETE KIT ASSEMBLED & TESTED | |LLUSTRATED C PROGRAMMING ................. $17.95 
HARD DISK CONTROLLER CARD ILLUSTRATED MS/PC DOS ...................005. $i2ee |; 
THE FANTASTIC KONAN KDC-230. WITH MANUAL. SUPER EASY ILLUSTRATED MULTIMATE .................0..-.. $17.50 | WE STILL SELL 
TO CONFIGURE AND USE. 
HALF SIZE PCB. $9900 — ADD $8.00 FOR CABLES WORDSTAR CUSTOMIZING wiieeemaihy Daly o 0; eh Btuner's 9. apres &. bine eifen eels $18.50 Phe comet 
COMMUNICATIONS HANDBOOK ................. S150 ansene 
MEX-PC MODEM 49 95 ADVANCED TURBO PASCAL PER Cara. 
SOFTWARE PACKAGE ® PROGRAMMING TECHNIQUES ................... $19.95 


A FANTASTIC COMMUNICATIONS PACKAGE WITH FEATURES TOO . 4 i 
NUMEROUS TO LIST. SEE MAY/JUNE '86 MICRO SYSTEMS JOURNAL FOR SCHEMA: Schematic Capture and Drawing Package 


FULL REVIEW OR CALL FOR BROCHURE. SUPPORTS COLOR, KERMIT WORKS WITH PC’S AND COMPATIBLES. EASY TO USE WITH OFF THE SHELF 
PROTOCOL, Y MODEM BATCH, VT100 EMULATION, REMOTE OPERATION, PRINTERS, MOUSES, VIDEO CARDS, ETC. COMES COMPLETE WITH A HUGE 
ON LINE HELP, ETC. RUNS UNDER PC/MS DOS. 180 PAGE MANUAL & BINDER. COMPONENT DATABASE. SUPPORTS MONOCHROME, COLOR, OR EVEN EGA. FREE 













PC/XT AT 
ENHANCED GRAPHICS ADAPTER 


NEW! 

PC/XT EPROM 

PROGRAMMER 
$199 


* LATEST DESIGN * PROGRAMS UP TO 4 DEVICES AT ONE TIME * FEATURES 
EASY TO USE MENU DRIVEN SOFTWARE THAT RUNS UNDER PC OR MS-DOS. 
* USES AN INTELLIGENT PROGRAMMING ALGORITHM FOR SUPER FAST 
(8X) EPROM BURNING. *« THIS PLUG-IN BOARD ATTACHES TO AN EXTERNAL 
MINI CHASSIS CONTAINING 4 TEXTOOL Z.I.F. SOCKETS. * NO PERSONALITY 
MODULES REQUIRED * AUTOMATIC VPP SELECTION: 12.5V, 21V, OR 25V. 
* EPROM DATA CAN ALSO BE LOADED FROM OR SAVED TO A DISKETTE. 
* PROGRAMMING SOFTWARE SUPPORTS: 2716, 2732, 2732A, 2764, 2764A, 
27128, 27128A, 27256, 27256A, 27512, AND 27512A. * ASSEMBLED AND TESTED, 
BURNED. IN WITH MANUAL. $199 WITH SOFTWARE. 


MICROTEK 2 M.B. EXPANDED MEMORY BOARD $195 (0. kK) 
MEETS LOTUS/INTEL/MICROSOFT SPEC. FOR EXPANDED MEMORY. FOR USE AS 
EXPANDED MEMORY (EMS), ELECTRONIC DISK, OR PRINT SPOOLER. WITH A SUPERB 
MANUAL AND INSTALLATION SOFTWARE. FOR PC/XT OR. MOST COMPATIBLES. FOR 2 
MEGABYTES OF 150 NS RAM (72 DEVICES) INSTALLED AND BURNED IN ADD $225. 


ZRT-80 CRT TERMINAL BOARD! 


A LOW COST 2-80 BASED SINGLE BOARD THAT ONLY NEEDS AN THE NEW 65/9028 VT 
ASCII KEYBOARD, POWER SUPPLY, AND VIDEO MONITOR TOMAKEA ANSI VIDEO TERMINAL BOARD! 
COMPLETE CRT TERMINAL. USE AS A COMPUTER CONSOLE, OR * FROM LINGER ENTERPRISES * 

WITH A MODEM FOR USE WITH ANY OF THE PHONE-LINE COMPUTER A second generation, low cost, high performance, mini sized, single board 
SERVICES. ' “ _— for making your own RS232 Video Terminal. This highly versatile board 
FEATURES: can be used as a stand alone video terminal, or without a keyboard, as a 
* Uses a Z80A and 6845 CRT video console. VT100, VT52 Compatible. MICRO SIZE! 
























* 3 CARDS IN ONE! 

* 100% IBM COMPATIBLE. 

* COMPATIBLE WITH IBM EGA, COLOR GRAPHICS ADAPTER, OR 
MONOCHROME ADAPTER. 

* 256K VIDEO RAM! (4 TIMES MORE THAN IBM!) 

* DUAL FREQUENCY OUTPUT FOR EITHER EGA OR 
STANDARD RGB COLOR MONITORS. 

* PERFECT MATE FOR NEC MULTISYNC COLOR MONITOR! 

* LIGHT PEN INPUT. 

* FULL 16 COLORS. 

* PARALLEL PRINTER PORT. 

* A SUPERIOR BOARD AT ABOUT 1/3 THE COST OF IBM EGA! 

* ASSEMBLED, TESTED, AND BURNED IN. WITH MANUAL. 

* USES CHIPS & TECH. VLSI 4 CHIP SET. 
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capabilities. FEATURES: 
* RS232 at 16 BAUD Rates from 75 * Uses the new CRT9128 Video Controller 
to 19,200. driven by a 6502A CPU 






* 24 x 80 standard format (60 Hz). 

* Optional formats from 24 x 80 
(50 Hz) to 64 lines x 96 characters 
(60 Hz). 

* Higher density formats require up to 
3 additional 2K x 8 6116 RAMS. 

* Uses N.S. INS 8250 BAUD Rate Gen. 
and USART combo IC. 

* 3 Terminal Emulation Modes which 


* On-Screen Non-Volatile Configuration 

* 10 Terminal Modes: ANSI, H19, ADM-5, 
WYSE 50, TVI-920, KT-7, HAZ-1500, 
ADDS 60, QUME-101, and Datapoint 8200 

* Supports IBM PC/XT, and Parallel ASCII 

Keyboards 

Supports standard 15.75 kHz (Horiz.) 

Composite or Split Video (50/60 Hz) 

25 X 80 Format with Non-Scrolling 






prrres 








* 






* 








* 
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incl the LSI-ADM3A, the Heath * Jump or Smooth Scroll $ 
aa s d the Beehi ADD * RS-232 at 16 Baud Rates from 50 to 19,200 95 
a Ssamartite a Split Video. feat t-00 $50 * On Board Printer Port E 
* Any polarity of video or sync. (COMPLETE KIT, 2K VIDEO RAM) * Wide and Thin Line Graphics ADD $40 FOR A&T 
* Inverse Video Capability. * Normal and Reverse Attributes (Full Kit w/100 Page Manual) 
x Small Size: 6.5 x 9 inches. BLANK PCB WITH 2716 * Cumulative Character Attributes: De-Inten, 
* Upper & lower case with descenders CHAR. ROM. 2732 MON. ROM Reverse, Underline and Blank SOURCE DISKETTE: 
PP . : * 10 Programmable Function Keys and PC/XT FORMAT 
. Bae eee arc $4995 Answerback message 5% IN. $15 
a Sener cee Reg Dome. * 5 X 8 Character Matrix or 7 X 9 for IBM Monitors 
rOR 8 IN. SOURCE DISK SOURCE DISKETTE - ADD $10 * Mini Size: 6.5 X 5 inches NEW OPTION 
(CP/M COMPATIBLE) SET OF 2 CRYSTALS - ADD $7.50 * Low Power: 5VDC @.7A, + 12VDC PC/XT keyboard ROM. Allows use of 
ae @ 20mA. IBM style keyboard. $15 
















TERMS: Add $3.00 postage. Orders under $15 add 75¢ handling. NoC.O.D. 
We accept Visa and MasterCharge. Tex. Res. add 5-1/8% Tax. Foreign 
orders (except Canada) add 20% P & H. Orders over $50 add 85¢ for 
insurance. Prices subject to change without notice. 
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STRUCTURED PROGRAMMING 
(continued from page 109) 


time, the application program reads 
the menu files. Thus, you can modify 
the menu text with an editor, leaving 
the compiled application program 
intact. This method was chosen by 
the developers of the Macintosh, 
who call the files containing the 
menu data “resource files.”’ 

I'll get you started by introducing 
two ways to store menu information 
in a separate file. Each method offers 
a type of ‘menu builder” that reads a 
different structure for the menu text. 

The first approach is the simpler 
one. It is based on the idea that most 
text editors cannot insert and display 
extended ASCII characters. The solu- 
tion lies in the following steps: 


1. Type a text that resembles the 
framed menu text, such that the 
frame characters are substituted 
with displayable characters (for ex- 
ample, the bar, hyphen, underscore, 
plus sign, and so on). 





2. Construct a list that maps the 
above displayable characters with 
the ASCII code number of the frame 
characters. 


Listing Five, page 99, shows a pro- 


gram that implements this method. | 


The procedure Build_Screen reads 
the menu text file, which contains the 
mapping list discussed above (one 
item per line). The character set used 
is [!.@,*,$,*,&,/,\,/,—,—]. The map- 
ping list is delimited by the keyword 
START, which can be followed by two 
menu-frame_ shift coordinators. 
SHIFTCOL <number> and SHIFTROW 
<number> tell the menu builder 
that the menu frame is displaced by 
the specified number of columns and 
rows, respectively. The shift declara- 


tions can appear in any order and are 


optional, with default values of 0. The 
next lines contain the menu text. The 
menu builder scans each line, one 
character at a time, and translates any 
character found in the mapping list. 
Procedure Show_Menu displays the 
translated strings that form the menu, 


A special offer to our readers . . . 


To order: 


showing the sought frame characters. 
Procedure DISP_STR is used to write to 
the screen of an IBM PC directly for 
fast display. 

The structure of the menu text file 
is simple and gives you a good idea of 
what the menu looks like. ‘The sizes of 
the menu text files are larger than 
those of the next method, in which 
the menu text is compressed. The sec- 
ond technique uses a menu interpret- 
er/builder because the menu text 
contains display commands. Listing 
Six, page 100, shows a test program 
using this method. The structure of 
the menu text file is as follows: 


1. Frame parameters—Can contain 
any of the following directives (each 
is composed of a single letter fol- 
lowed by a number): 

¢ L—Left-edge shift to specify the col- 
umn position of the left edge of the 
menu frame. Its value ranges be- 
tween 1 (default) and that of the right 
edge minus 4. 

¢R—Right-edge shift to specify the 
column position of the right edge of 
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~ DR. DOBB'S CAIALOG 


announcing: 
TURBO PASCAL TOOLS 


INCLUDING: 


Turbo Advantage, a library of over 200 Turbo Pascal routines, 
Turbo Display with Turbo Pascal procedures and functions to 
help you generate forms. 

Turbo Complex to help you work with complex numbers in 
Turbo Pascal 


TURBO PASCAL TOOLBOOK 
Dr. Dobb’s Listings #3 


including listings from Sept. through Dec. 1986 


FREE! 
Dr. Dobb’s Holiday 
Giff to You! 


As a special holiday gift to DDJ readers, we’ll send you 
Dr.Dobb’s Sourcebook: A Reference Guide to the C Program- 
ming Language FREE with any order received by Dec. 31, 1986. 





ALSO INSIDE: 

DR. DOBB’S BOUND VOLUMES 

DR. DOBB’S COMPLETE C TOOLBOX 
THE TOOLBOOK OF FORTH 

280 TOOLBOOK 

TOOLBOOK OF 68000 PROGRAMMING 
A UNIX-LIKE SHELL & UTILITY PACKAGE 
FOR MS-DOS 

IAMING DOS 





M&T BOOKS 





NEW! DR. DOBB’S BOUND VOLUME 10 


Bound Volume #10: The year of living dangerously. In 1985, 
iconoclastic DDJ beat Apple to the goal of adding more 
memory, a SCSI port, and a hard disk to the Macintosh. We 
dared to criticize the much-praised Turbo Pascal, challenged 
the Unix establishment with plans for a free Unix, and asked 
hard questions about privacy and control in the Information 
Age. Of course we also kept the technical level high, with the 
most exhaustive review ever of programmers’ editors and of C 
compilers, and with powerful software tools in C, Modula-2, 
Forth, Pascal, assembly language, and Prolog. 


Item #020D $35.75 


Bound Volume #1: 1976 The working notes of a 
technological revolution. Before there was an Apple, DDJ put a 
programming language on the first microcomputers, and 
became chronicler and instrument of the microcomputer 
revolution. 


Item #013 $30.75 


Bound Volume #2: 1977 Running light without overbyte. 

By year two the formula was clear: serious technical questions 
handled with a minimum of reverence; much source code; and 
a commitment to tight coding. 


Item #014 $30.75 


Bound Volume #3: 1978 The roots of Silicon Valley 
growth. The S-100 bus was hashed out in DDJ’s pages. Steve 
Wozniak and others published in DDJ code that would help 
build an industry. 


Item #015 $30.75 


Bound Volume #4: 1979 In the midst of the gold rush. 
Three years before IBM moved in, the neighborhood was less 
civilized. DDJ published a gold mine of tips, tricks, and 
algorithms. 


Item #016 $30.75 


Bound Volume #5: 1980 C and CP/M. 1980 saw an all- 
CP/M issue, including Gary Kildall’s history of CP/M, and 
Ron Cain’s original Small-C compiler. 


Item #017 $30.75 


Bound Volume #6: 1981 The First of Forth. This was the 
year DDJ launched its first Forth issue and Dr. Dobb’s Clinic. 
Plus: PCNET, the Conference Tree, and 6809 Tiny BASIC. 
Item #018 $30.75 





Dk. DOBB’S CATALOG 





PEPER MERE BE SBOE O IE BM a aE 


Bound Volume #7: 1982 Legitimacy. DDJ observed the 
IBM phenomenon, reviewed MS-DOS and CP/M-86, and 
looked forward to fifth-generation computers. 


Item #019 $35.75 


Bound Volume #8: 1983 Power tools. Professional 
software development on a PC was getting easier; DDJ helped, 
with Small-C, the RED editor, and an Ada subset. 

Item #020 $35.75 





Bound Volume #9: 1984 Shaping things to come. In 1984 
DDJ examined new programming environments: Prolog, expert 
systems, Modula-2, and a $49.95 Pascal. Plus Allen Holub’s 
GREP, Unix internals, and two encryption systems. 


Item #020B $35.75 


SAVE! ORDER THE COMPLETE 10 VOLUME SET! 


Receive all ten Bound Volumes for only $262! You save $65! 


Item #020E $262 





TO ORDER: return THE FORM AT THE END OF THE CATALOG, OR 
CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 


\ 
{ 
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DR. DOBB'S 1986 LISTINGS ON DISK 


Dr. Dobb’s Journal of Software Tools offers the convenience of 
selected listings on disk. 


DR. DOBB'S LISTINGS #1 


JANUARY-APRIL 1986 


Includes listings from the following articles, and more. 
January Issue #111 

“A Simple OS for Realtime Applications; 68000 Assembly 
Language Techniques for an Operating System Kernel” by 
DDJ editor Nick Turner. 

‘32-bit Square Roots; An 8086 Assembly Language Routine 
for 32-bit Square Roots” by Michael Barr. 

February Issue #112 

“Data Abstraction with Modula-2” by Bill Walker and 
Stephen Alexander. 

‘Learning Ada on a Micro; A Draw Poker Program in Ada” by 
DoWhile Jones. 

March Issue #113 

‘A Variable-Metric Minimizer; A C Program for Minimizing 
Arbitrary Functions” by Joe Marasco. 

“Concurrency and Turbo Pascal; An Approach to Implement- 
ing Coroutines in Pascal” by Ernest Bergmann. 

April Issue #114 

‘Boca Raton Inference Engine; Lisp, Prolog, and Expert-2 
Techniques and Code” by Robert Brown. 


Dr. Dobb’s Listings #1/86 Item #170 $14.95 








DR. DOBB’S LISTINGS #2 


MAY-AUGUST 1986 


Includes listings from the following articles, and more. 
May Issue #115 

‘Simple Plots with the Enhanced Graphics Adapter” by 
Nabajyoti Barkakati. 

“The Cryptographer’s Toolbox” by Fred A. Scacchitti. 
June Issue #116 

“Structured Programming; Overloading Procedures, Exporting 
Opaque Types, Data Hiding” by Namir Shammas. 
‘““Compuserve B Protocol” by Steve Wilhite. 

July Issue #117 

“Structured Programming; Tiny Tools, Array-Defining 
Words” by Michael Ham. 

August Issue #118 

“Structured Programming; Generic Routines in Ada and 
Modula-2, Extended For Loop” by Namir Shammas. 


Dr. Dobb’s Listings #2/86 Item #171 $14.95 
Please specify MS-DOS, Macintosh, or CP/M. 
For CP/M disks specify: Apple, Osborne, Kaypro, Zenith 


Dr. Dobb’s Listings #3 


September - December 1986 


Includes listings from the following articles, and more: 
September Issue #119 

‘Algorithms: Curve Fitting with Cubic Splines” by Ian E. 
Ashdown “C Chest: Directory Traversal, Trailing Zs, and 
Horrifying Experiences” by Allen Holub 

October Issue #120 

“C Chest: More, a File-Browsing Utililty” by Allen Holub 
‘Processors: TNZ: An 8-bit to 16-bit Translator” by Richard 
Campbell 

November Issue #121 

‘Digital Dissolve” by Mike Morton 

“Mandelbrot Set” by Howard Katz 

December Issue #122 

“In Search of a Sine” by R.A. Campbell 

16-bit Software Toolbox: A demo program to illustrate the 
undocumented MS-DOS Int 2EH route to the command 
interpreter in command.com by Ray Duncan and his readers, 
and 8086-68000 based string comparison routines. 


Dr. Dobb’s Listings #3/86 Item #172 $14.95 


TO ORDER: returN THE FORM AT THE END OF THE CATALOG, OR 


CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 
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DR. DOBB’S C TOOLBOX 


DR. DOBB’S TOOLBOOK OF C 


Over 700 pages of C material, including articles by such C ex- 
perts as Kernighan and Ritchie, Cain and Hendrix, Skjellum 
and Holub! The level is sophisticated and pragmatic. The most 
valuable part of the Too/book to many will be the hundreds of 
pages of useful C source code, including: Jim Hendrix’s famous 
Small-C Compiler and New Library for Small C—Also avail- 
able on disk!; NEW! Hendrix’s Small Mac: An Assembler for 
Small C and Small Tools: Programs for Text Processing—Both 
also available on disk!; and all of Anthony Skjellum’s C Pro- 
grammer’s Notebook columns distilled by Tony into one 
thought-provoking chapter. 

From M&T Publishing and Brady Communications 

Dr. Dobb’s Toolbook of C Item #005 $29.95 


SMALL-C COMPILER 


Jim Hendrix’s Small C Compiler is the most popular piece of 
software published in Dr. Dobb’s 11-year history. Like a home- 
study course in compiler design, the Small-C Compiler and the 
Small-C Handbook provide everything you need but the com- 
puter for learning how compilers are constructed, and for learn- 
ing C at its most fundamental level. 


Small-C Compiler Item #007 $19.95 


SMALL-MAC: 


AN ASSEMBLER FOR SMALL-C 


This assembler features simplicity, portability, adaptability, 
and educational value. The package includes: a simplified mac- 
ro facility; C language expression operators; object file visibili- 
ty; descriptive error messages; and an externally defined in- 
struction table. 

You get the macro assembler, linkage editor, load-and-go load- 
er, library manager, CPU configuration utility, and a utility to 
dump relocatable files. Documentation is also included. 

For CP/M systems only. Please specify format. 

Small-Mac Item #012A $29.95 


SMALL-TOOLS: 
PROGRAMS FOR TEXT PROCESSING 


This package of programs performs specific, modular opera- 
tions on text files, including: editing; formatting; sorting; merg- 
ing; listing; printing; searching; changing; transliterating; copy- 
ing; concatenating; encrypting and decrypting; replacing spaces 
with tabs and tabs with spaces; counting characters, words, or 
lines; and selecting printer fonts. 

Small-Tools is supplied in source code form only. With the 
Small-C Compiler you can select and adapt these tools to meet 
your own needs. Documentation is included. 
Small-Tools Item #010A 


$29.95 





THE SMALL-C HANDBOOK 


Jim Hendrix’s Small-C Handbook is the reference book on his 
Small-C Compiler. In addition to describing the operation of 
the compiler, the book contains complete source listings to the 
compiler and its library of arithmetic and logical routines. 
A perfect companion to the Hendrix Small-C Compiler avail- 
able from DDJ on disk, the Handbook even tells you how to use 
the compiler to generate a new version of itself! 
While both the Handbook and the Toolbook provide documen- 
tation for the Small-C Compiler, the Handbook contains a 
more detailed discussion and is available with addendum for 
the MS/PC-DOS version. 
From M&T Publishing and Brady Communications 
The Small-C Handbook Item #006 $17.95 
The Handbook with MS/PC-DOS Addendum 

Item #006A $22.95 


C DISK FORMATS 

When ordering, please indicate MS/PC DOS or CP/M. For 
CP/M disks, please specify one of the follwing formats: Apple, 
Osborne, Kaypro, Zenith Z-100 DS/ DD, 8” SS/SD. Special 
order formats are available for an additional $10 each. 


SPECIAL PACKAGES 
20% OFF 


CP/M C PACKAGE 


Receive this special package and save $20! 

You'll get: Dr. Dobb’s Toolbook for C; The Small-C Hand- 
book; The Small-C Compiler on disk; The Small-Mac assem- 
bler on disk, with documentation; and The Small-Tools text- 
processing programs on disk, with documentation all for only 
$99.95! 

Please specify format. 


CP/M C Package Item #005A $99.95 


MS/PC-DOS C PACKAGE 

Save $20 when you order this special package. 

You'll receive: Dr. Dobb’s Toolbook of C; The Small-C Hand- 
book with the MS/PC DOS Addendum; The Small-C Compil- 
er on disk; and The Small Tools text-processing programs on 
disk, with manual all for only $82.95. 


MS/PC-DOS C Package Item #005B $82.95 


TO ORDER: RETURN THE FORM AT THE END OF THE CATALOG, OR 


CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 
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SH: A UNIX-LIKE SHELL FOR MS-DOS 


Includes complete source code and documentation 


THE SHELL V.2 
NEW, UPGRADED VERSION! 


The shell is an MS-DOS implementation of the most often used 
parts of the UNIX C Shell. This package includes an execut- 
able version of the Shell, along with complete source code 
and full documentation, by DDJ columnist Allen Holub. 

If you are a registered user, or have already purchased Version 
1 of the Shell from Dr. Dobb’s, you can receive the upgrade 
disk for only $6. Supported features include: 


Editing Command-line editing with the cursors is supported. 
The line is visible as you edit it. 

Aliases Can be used to change the names of commands or as 
very fast, memory-resident, batch files. Nested aliases are 
supported. 

History You can execute previous commands. The command 
can be edited before being executed. Version 2 supports imbed- 
ded history requests (Bar; !! >foo). 


Redirection and Pipes <> >> >& >>& } 
Pipe temporary files can be put on a RAM disk. 


Unix-like Command Syntax / can be used to separate directo- 
ry names (\ can now be used as well). A 2048-byte commnd line 
is supported. Command-line wild card expansion. Multiple com- 
mands on a line. 

DOS-compatible prompt support 

$d $t $_ $e $h $n $q $$ $% 

C-Shell Based Shell Scripts (batch files) Shell Variables are 
macros that can be used on the command line. Version 2 sup- 
ports arithmetic manipulation of shell variables using the @ 
command. The following C operators are supported:() + — 
F/% <= >= <> = == ! &K ti = 

A batch file can call another batch file like a subroutine. Control 
is passed to the second file and then back to the first when the 
second is finished. Batch files can return values to the calling file 
using the exit and $status mechanisms. 


A powerful, interpretive, programming language, based on the 
UNIX C Shell, is now supported, including: 
if /then/else foreach break 
while switch /case continue 
All commands can be nested. 
The shell runs on IBM PC’s and compatibles. 


The Shell Item #160 $29.95 


The Shell Upgrade Disk Item #160A $6.00 
(for owners of the Shell Version 1) 


SAVE OVER 15%! ORDER THE SHELL 
AND /UTIL TOGETHER FOR ONLY $50! 


Shell /Util Package Item #162 $50 








SUTIL 


/Util is a collection of UNIX-like utility programs for MS-DOS. 
This package includes updates of the highly acclaimed Dr. 
Dobb’s articles; Grep: a UNIX-like Generalized Regular Ex- 
pression Processor, and LS and Getargs from DDJ’s C Chest. 

Source code is included and all programs (and most of the 
utility subroutines) are fully documented in a UNIX-style 
manual. You’ll find executable versions of: 


cat echo mv rm 

cp grep Dp rmdir 

date Ls pause sub 

du mkdir printenv chmod 

/Util Item #161 $29.95 


TO ORDER: return THE FORM AT THE END OF THE CATALOG, OR 
CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 
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THE DR. DOBB’S TOOLBOOK SHELF 


Z80 TOOLBOOK 


David E. Cortesi, longtime Dr. Dobb’s columnist brings you: 


. a method of designing programs and coding them in as- 
sembly language. Cortesi walks through the initial 
specifications, designing an algorithm and writing the 


code. He demonstrates the construction of several useful programs. 
- a complete, integrated toolkit of subroutines for arithmetic, 


for string-handling, and for total control of the CP/M file 
system. They bring the ease and power of a compiler’s run- 
time library to your assembly language work, without a 
compiler’s size and sluggish code. 


- Every line of the toolkit’s source code is there to read. 


ORDER THE Z80 SOFTWARE ON DISK! 


All the software in Dr. Dobb’s Z80 Toolbook—the programs 
plus the entire toolkit, both as source code and object modules 
for both CP/M 2.2 and CP/M Plus—is yours on disk! 


Most of the programs are included in the book, however, the disk 


is necessary for complete listings. A Z80 microprocessor and a 
Digital Research International RMAC assembler or equivalent 
are required. 


Dr. Dobb’s 780 Toolbook 


Dr. Dobb’s Z80 Toolbook w/disk 
Please specify one of the following disk formats: 8” SS/SD, 
Apple, Osborne, or Kaypro 


DR. DOBB'S 
TOOLBOOK OF FORTH 


This comprehensive collection of useful Forth programs and tu- 
torials contains DDJ’s best Forth articles, expanded and revised 
along with new material. In addition, you'll glean important in- 
sights about the potential of this increasingly popular language 
from the many in-depth discussions of advanced Forth topics. 
You'll find sections on: 


Mathematics in Forth, including “Series Expansion in 
Forth,” “Forth Floating-Point Package,” and “Signed 
Integer Division” 

Modifications /Extensions, including “A Proposal for 
Strings in Forth,” ‘““Non-Deterministic Control Words,” 
“Some Forth Coding Standards,” and “Towards a More 
Writable Forth Syntax” 

Forth Programs, including “GO in Forth,” “Elements of a 
Forth Data-Base Design,” ‘“‘The Forth Sort,” “SEND & 
RECV,” “Interface for a Mouse,” “Relocating Loader in 
Forth,” “‘Forth Decompiler,” ““Screen-Oriented Editor 
ReVisited,” ““Evolution of a Video Editor,” ““H-19 
Screen Editor,’ and ““The Conference Tree.” 





Item #022 $25 
Item #022A $40 





Forth—the language, including ““The Forth Philosophy,” 
“Teaching Forth as a First Language,” and “‘Forth-83 

and Vocabularies” 

Implementing Forth, including ‘Forth and the Motorola 
68000,” ‘A 68000 Forth Assembler,” ““A Forth Assem- 
bler for the 6502,” and ‘*Z8000 Forth.” You'll also find 
Appendices that will help you convert fig-Forth to Forth- 
83, and tell you how to stay up-to-date on the latest de- 
velopments and refinements of this popular language. 


The screens in the book are also available on disk as ASCII 
files. Receive Dr. Dobb’s Toolbook of Forth, along with the 
software on disk, together for only $39.95. 


Dr. Dobb’s Toolbook of Forth Item #030 $22.95 
Dr. Dobb’s Toolbook of Forth w/Disk 
Item #031 $39.95 


Please specify MS /PC-DOS, Apple II, Macintosh, or CP/M. 
For CP/M disks, specify Osborne or 8” SS/SD. 


TO ORDER: return THE FORM AT THE END OF THE CATALOG, OR 


CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 
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DR. DOBB’S LATEST RELEASES 
DR. DOBB’S TOOLBOOK OF 68000 PROGRAMMING 


In this complete collection of practical programming tips and 
techniques for the.68000 family, you’ll find the best articles on 
68000 programming ever published in Dr. Dobb’s, along with 
new material from 68000 experts. You’ll learn about the most 
important features of the 68000 microprocessor from a full de- 
scription and concise discussion of its history and design. And, 
useful applications and examples will show you why computers 
using the 68000 family are easy to design, produce and 
upgrade. Contents include: 


an Introduction to the 68000 Family 

¢ 68000 Instruction Set 

Development Tools 

¢ Bringing Up the 68000: A First Step 
¢ A 68000 Cross-Assembler 

Useful 68000 Routines and Techniques 


¢ A Simple Multitasking Kernel for Real-Time Applications 
¢ The Worm Memory Test 
¢ A Mandelbrot Program for the Macintosh 


All programs are available on disk! 
In addition, an executable version of the 68000 Cross-Assem- 
bler can be purchased along with the source code and documen- 
tation for $25. (Requires one or more disk drives and either 
CP/M-80, CP/M 2.2 with 64 bytes or MS-DOS with 128 
bytes) 
Dr. Dobb’s 68000 Programming Toolbook Item #040 $29.95 
68000 Toolbook with Disk Item #041 $49.95 
Please specify one of the following disk formats: CP /M 8”, Os- 
borne, Macintosh, Amiga, Atari 520st, MS-DOS 
68000 Cross-Assembler Item #042 $25 


STAT TOOLBOX FOR TURBO PASCAL 


The STAT TOOLBOX is two statistical packages in one! 
Whether you’re a programmer looking for tools to build your 
own applications, or a user who wants a complete, fully func- 
tioning package, the STAT TOOLBOX will bring convenience, 
power and versatility to your statistics programs! 

The STAT TOOLBOx is written in Turbo Pascal and includes 
full source code. It contains two complete packages: 

A reference disk and manual 

Flexible, time-saving building blocks allow you to customize 
statistical applications to fit your needs. You’ll find: 

¢ statistical distribution functions; 

¢ random number generation; 

e basic descriptive statistics 

* parametric and non-parametric statistical testing. 


¢ bivariate linear regression, multiple and polynomial 
regression 
¢ automatic best curve selection 


A demonstration disk and manual 

The demonstration package includes fully functioning statisti- 
cal programs, and two data management programs. In addition 
to these practical tools, files containing sample data will help 
users learn to enter, edit, maintain and manipulate data. 

High resolution graphics capabilites include drawing histo- 
grams and regression lines, and plotting residuals for regression 
analysis. (Borland’s Turbo Graphic’s Toolbox is required) 

For IBM PC’s and compatibles. Turbo Pascal version 2.0 or lat- 
er, and PC-DOS 2.0 or later are required. 


Stat Toolbox Item #050 $69.95 


TAMING DOS sy THOM HOGAN 


Learn how to make DOS work for YOU! Taming DOS will take 
you beyond the basics, picking up where your DOS manual 
leaves off. You'll find batch files and DOS enhancements that 
extend the power of DOS so you can work more accurately and 
efficiently. And, you’ll learn how to customize DOS to fit YOUR 
needs, saving you time and frustration every time you use it. 
Taming DOS will show you how to create a memory-resident 
clock, rename subdirectories and change file attributes. You’ll 
learn more about what’s on your disk and how to protect it easi- 
ly, how to create configurable AUTOEXEC.BAT files and un- 
derstand redirection and piping. You’ll find: 
¢ how to customize CONFIG.SYS and use 

ANSI.SYS to change the appearance of DOS 
e extensive batch file coverage 





* example routines using redirection, including redirection op- 
erators, filters, and pipes 

¢ DOS enhancement programs that are ready to use, with exe- 
cutable commands. 

¢ Full source code, allowing you to alter programs and create a 
custom system. 

The book includes assembly language programs that allow you 

to manipulate DOS at its lowest form. An assembler is not 

needed to enter the programs; Taming DOS presents an alterna- 

tive method for anyone with BASIC on their machine. The pro- 

grams, including batch files and DOS enhancements are also 

available on disk along with source code. 

Taming DOS Item #060 

Taming DOS with disk Item #061 


$19.95 
$34.95 


TO ORDER: returN THE FORM AT THE END OF THE CATALOG, OR 


CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 
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TURBO PASCAL TOOLS 


TURBO ADVANTAGE: SOURCE CODE 
LIBRARIES FOR TURBO PASCAL 


Here’s the advantage you need to make your programming 
easier and more efficient! This library of 220 routines, complete 
with source code, sample programs and documentation, will 
save you hours developing and optimizing your programs. A 
few of the helpful Turbo Advantage files include: 

* arithmetic operations * bit manipulations * check routines 

* data compression * differentiation and integration * Fourier 
analysis and synthesis * file management and hash methods 

-* Input/Output routines * matrix processing * menu functions 
* MS-DOS support * linear and nonlinear optimization 

* screen/printer redefinition * sorting routines * spline 
integration, differentiation, interpolation * statistical 
procedures * string processing * type conversion 

All procedures and functions are supplied in source code form 
so you can adapt them to meet your needs. Each file contains a 
list of relevant routines, all explained with example programs to 
help you understand the callings, parameters and data types in 
detail. Most of the programs can be immediately compiled. 
The detailed manual includes a short characterization of the 
routine, a description of the way the routine works with an 
explanation of the methods used, the calling sequence— 
including a description of the parameters and the function 
result, notes with advice and special explanations, and a simple 
example illustrating the files and variables needed. 


Turbo Advantage is for MS/PC DOS systems. 
Item #070 $49.95 


TURBO COMPLEX ADVANTAGE: 
COMPLEX NUMBER ROUTINES 
FOR TURBO PASCAL 


Working with complex numbers, vectors and matrices is easy 
with Turbo Advantage Complex! This library of over 80 
procedures and routines will help you program complicated 
functions more easily. You’ll find routines to help you: 


* use digital filters, solve boundary-value problems and 
process very large arrays; 

* carry out vector and matrix calculations with complex 
integers and variables; 

* execute time-saving simultaneous Fourier transforms and 
calculations of convolution and correlation functions. 


The Turbo Complex package includes source code and 
documentation. For MS-DOS systems. Some of the Turbo 
Complex routines are most effectively used with routines 
contained in the Turbo Advantage package. 

Item #071 $89.95 





THE TURBO PASCAL 
TOOLBOOK 


The Turbo Pascal Toolbook contains routines and sample 
programs to make your programming easier and more 
powerful. 


¢ Mathematical Expression Parsers offers two routines that 
convert mathematical expressions into RPN tokens. 


¢ External Sorting and Searching Tools presents a new 
database routine that combines the best features of the B-tree. 
B+ and B+ + trees. 


¢ When Turbo Isn’t Enough presents an extensive library of 
low-level routines that show you how to tap into the hardware 
and the operating system. 


¢ Window Management will help you create, sort and overlay 
windows. 


¢ A Smart Statistical Regression Model automatically searches 
for the best regression model to represent a given set of data. 
The routine libraries and the sample programs in The Turbo 
Pascal Toolbook are also available on disk for MS-DOS 
systems. Complete source code is included. 


The Turbo Pascal Toolbook 
The Turbo Pascal Toolbook with disk 


Item #081 $25.95 
Item #081 $45.95 


TURBO DISPLAY ADVANTAGE: 
FORM GENERATOR 
FOR TURBO PASCAL 


Now, even if you have little programming knowledge, you can 
design and process forms to fit your needs! The Turbo Display 
form generator includes a text editor, 30 time-saving Turbo Pas- 
cal procedures and functions, and a concise, informative hand- 
book to help you take full advantage of all Turbo Display 
capabilities. 


Turbo Display includes source code and documentation. For 
MS-DOS systems. Some of the Turbo Advantage routines are 
necessary to compile Turbo Display. 

Item #072 $69.95 


TO ORDER: return THE FORM AT THE END OF THE CATALOG, OR 


CALL TOLL-FREE 1-800-528-6050 EXT 4001 


AND REFER TO PRODUCT ITEM NUMBER, TITLE AND DISK FORMAT 














NAME 
(Please use street address, not P.O. Box) 
ADDRESS For Faster Service 
On Credit Card Orders 
CITY STATE ZIP 


CALL TOLL FREE 
ba oN — 1-800-528-6050 








For disk orders, please indicate ferinat Refer to ad for standard format Ext. 4001 
availability for each product. Special formats available for additional $10 each, Please Refer To Item # 
oe ee , When Ordering 
— E9MS/D0s OcP/M —— Zenith Z-100 DS/DD_ : 
oe Oo intosh _ —— Kaypro Oe Amine 3 : 


= {3 ae eI : a 8" SS/ SD a Apple oe Atari 320st 


QUANTITY ITEM # DESCRIPTION UNIT PRICE TOTAL PRICE 


SUB-TOTAL 


CA residents must add applicable sale tax on merchandise total ______ ss % > SALES TAX 
(CA residents must add sales tax EXCEPT Dr. Dobb’s Sourcebook #004) 


Shipping must be included with order. See rates below. OC SHIPPING 


TOTAL ORDER 


(COVISA NAME ON CARD 





-__‘ []} MASTERCARD ACCOUNTNO. Ones eee 
(] AMERICAN EXPRESS EXPIRATION DATE __ 


_ EU CHECK (make checks payable SIGNATURE 
to M&T Publishing) 





In US. For Bound Volumes, add $3.25 per book. Add $8.75 for special C Packages. For other books and disks, add $2.25 per item. 
Outside US. For Bound Volumes, add $6.25 per book surface mail. Add $18 surface mail for Special C Packages. For other books and disks, 
add $5.25 per item surface mail. Foreign airmail rates available on request. 


For Faster Service and reduced shipping costs, Europeans may order direct from: Markt & Technik, Buchverlag, Hans-Pinsel-Strasse 2, 
8013 Haar bei Munchen. Call Germany 89-4613-221 for prices in Deutch Marks. 


W 9 MT PROMPT DELIVERY! DEALER INQUIRY WELCOME! 
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STRUCTURED PROGRAMMING 
(continued from page 112) 


the menu frame. Its value ranges be- 
tween that of the left edge plus 4 and 
80 (the default). 

¢eH—Specifies either 1 or 2 as the 
number of lines in the horizontal 
menu-frame edges. 

¢ V—Specifies either 1 or 2 as the 
number of lines in the vertical menu- 
frame edges. 

2. START delimiter—Used because 
the above parameters are optional 
and can appear in any sequence; it is 
used to delimit this set of parameters 
from the optional column and row 
shift parameters. 

3. Column/row shift parameters— 
Use the keywords SHIFTCOL or SHIFT- 
ROW, followed by the corresponding 
magnitude. Give the column and row 
distance between the upper-left cor- 
ners of both the physical screen and 
the menu frame. 

4. Menu-building commands—Pro- 
vide the following symbols and char- 
acters used in building the desired 
menu and its frame: 

*(@<3-char code>—Used to specify 
a single extended ASCII-coded charac- 
ter. Function Get_Char_Code docu- 
ments the three-letter codes of vari- 
ous parts of the menu frame. For 
example, ULC represents the upper- 
left corner. 

¢ D<3-char code > <2-digit repeat fac- 
tor >—Used to duplicate a frame 
character. The three-character codes 
are used to specify the frame charac- 
ter, and two subsequent digits specify 
the number of times the character is 
duplicated. 

¢ S<2-digit >—-Used to skip the num- 
ber of columns specified by the two 
digits. 

¢ Double quote—Used to signal that a 
menu text follows. A bar symbol is 
used optionally to delimit the text. 

e #<2-digit>—Used to jump to the 
column position specified by the 
two-digit number. 

¢ V—Used to draw the left and right 
vertical frame edges with spaces in 
between. 

e H—Used to draw a horizontal line 
between the left and right edges. 


The procedures DISP_STR and Show 
—Menu are used as in the first method 
to display the menu in question 
quickly. 
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Tables 1 and 2, below, show menu 
text files that display the same 
framed menu using the first and sec- 
ond methods, respectively. The text 
in Table 2 is terser and more cryptic 
and thus is recommended for fre- 
quent use. For casual users, I recom- 
mend the first method. 

Because the two methods are not 
language or hardware dependent, 
they can be implemented easily in 
other languages. For programmers 
who work with multiple languages 
and translate programs, this ap- 
proach is attractive because the text 
files are reused without any change. 


/201 
\187 
&200 
%188 
$204 
@185 
*202 
1203 
-205 
(186 
START 


<-- Upper-left corner 
<-- Upper-right corner 
<-- Lower-left corner 
<-- Lower-right corner 
<-- Left tee 

<-- Right tee 

<-- Upper tee 

<-- Lower tee 

<-- Horizontal line 

<-- Vertical line 


jp 


1) Prepare data 
2) Calculate results 


3) Print results 


fo 


With menu-intensive applications it is 
more feasible to translate the menu 
builders. 


Bibliography 
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[Q]uit 
[Esclape 
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Table 1: Contents of a menu text file using the first menu-creation method. 
Comments have been added to the coded symbols. 


H2 

V2 

LO1 
R56 
START 


@ULC DHLN36 @DNT DHLN17 @URC 


@VLN S36 @VLN S17 @VLN 


@VLN S08 ’”MAINMENU! S09 @VLN” [Qluit! SO8 @VLN 


@VLN S36 @VLN ” [Esc]ape | @VLN 
@VLN DHLN36 @UPT DHLN17 @VLN 
@VLN ” 1) Prepare data! #54 @VLN 

Vv 


@VLN ” 3) Calculate results! #54 @VLN 
V 


@VLN ” 3) Print results! #54 @VLN 
@LLC DHLN54 @LRC 





Table 2: Contents of a menu text file using the second method. The menu 
displayed is equivalent to that obtained in Table 1. 
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trieve. 





The Programmer’s Choice. 


Wire you're serious about application 


development, there's just one choice for file 
management: Btrieve. With what Computer Language calls 
“near mainframe functionality”, Btrieve sets the file 
management standard for PC applications. With Btrieve 
loaded in your PC, your programs can use simple 
subroutine calls to retrieve, store and update records. 












B-tree 
based for high axcun’ 
Interfaces to C, BASIC, Pascal, , 
COBOL. Don't waste time 


performance. Performance 
is all-important, especially as 
your database grows. That's 
why Btrieve implements the 
b-tree file structure—the 
fastest, most efficient method 
of accessing data. 


way. Over 15 language 
interfaces available. 















7 Help is 
just a phone 
call away. 
Need technical 
support? You’ve got it! 
Btrieve users receive 30 days 
of unlimited phone support at no charge. This 
“Direct Connect” policy is renewable for a full 
year at low cost. And try SoftCraft’s free 
bulletin board for technical tips, seven days a week. 












Fault tolerant. Btrieve 
insures against database dis- 
asters. Two levels of fault 
tolerance guarantee data 
integrity during accidents or 
power failures—even if 
lightning strikes. No extra 
programming required. 


Circle no. 113 on reader service card. 


122 












ne oe ooo 


programming in awkward fourth generation 
languages! With Btrieve, simply use the languages 
you know best—and write applications the right 


No royalties. 
Need we say more? 


P.O. Box 9802 #917 Austin, Texas 78766 







Multi-user versions for 
LANs and Xenix. When your 
applications need to network, count on = 
Btrieve. A single version runs on all DOS 3° 
LANs, including IBM PC Network and Novell Advanced 
Netware. Btrieve is also available for Xenix and 
multitasking operating systems such as MultiLink 
Advanced, Microsoft Windows and IBM Topview. 





Built-in security 

features. Lock up sensitive 

data with Btrieve’s password protection and 
unique data encryption scheme—especially 
useful in local area networks. 










LEO EOE LI ES RN ae ee 


Thorough documentation, easy implementation. Getting 
started with Btrieve is easy: the manual is packed with examples of 
every Btrieve function in BASIC, Pascal, COBOL and C. 


Database queries, report writing. Add Xtrieve™ to your Btrieve 
applications for a fully-relational DBMS. Xtrieve's menu-driven 
interface gives your users the on-line query capabilities they 
need—without programming. Add 
our report writer option to produce 









custom reports and forms. DCE sag 









Btrieve 


RA 





SoftCraft 


(512) 346-8380 Telex 358 200 


Suggested retail prices: Btrieve, $245; multi-user Btrieve, $595; Xtrieve, $245; multi-user Xtrieve, 
$595 (for report generation, add $145 for single-user and $345 for multi-user). Available from SoftCraft 
and selected distributors. Requires PC-DOS or MS-DOS 2.X, 3.X, Xenix. Btrieve is a registered 
trademark and Xtrieve is a trademark of SoftCraft Inc. From Computer Language, November 1985. 
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ACTOR WILL DO WINDOWS. 


If you've been wondering how you're going to explore Microsoft® Windows and then 
work it into your programs, what you need has just arrived. 

ACTOR™ 

ACTOR is a new programming system, and there are two reasons why it’s so good 
with Windows. 

First, ACTOR is an ideal programming environment. It shows you all your work through 
Windows. Any part of the pro- 
gram you re writing, its output 
as it runs, error diagnostics and 
tracing, catalogs of routines, and, 
in fact, just about anything you 
like — they can all be visible on 
the screen and accessible at the 
same time, in their own windows. 

So it’s easier to see what 
you re doing. 

Second, ACTOR is an 

ACTOR" is a new, interactive pro- Moreover, ACTOR is a new, object- object-oriented programming 
gramming system, the first with Mic- _ oriented programming language. Wind- language. Everything in an 
rosoft® Windows. You have Windows - ing objects up and turning them loose ACTOR program is a self-con- 
when you write a program, and users is a lot easier, more productive, and more 


have Windows when they run it. fun than old fashioned programming. bes Bae eee Peek 
ala and procedures. al 1S, 


an object. And the objects pass 
messages to each other while 
the program runs. 

With ACTOR, you don’t 
write lists of instructions. 
Instead, you define what classes 
of objects do. Which is especially 
easy because they inherit most 
of their behavior from other 
classes. That means there's less 
for you to worry about. 

renal gaagecuetlon ACTOR anidealgrahead intelgeneeieneenge, Ghytees And When You create an 
nee ne ia down to clean up but in a familiar, Pascal style series object, you just choose its Name 
memory like other advanced languages. Which makes artificial intelligence pro. and Starting values. After that it 
You can even use it for real-time con- gramming easier. And what could be pretty much takes care of itself. 
trol. It’s that fast. smarter than that? What’s important here is 
that windows are objects like everything else in the language. You make as many as you need, 
and they do what they’re supposed to, mostly on their own. 
So it’s natural and easy to put windows in your application pees And users will 
benefit from Windows when your programs run, as much as you do when you write them. 
To order, just send in the coupon. Or call 312-491-2370 for more information. 
You ll see that ACTOR will do Windows, and more. 








Please send me more information about ACTOR. L] I'd like to place an order while I’m at it. (ACTOR is not copy 
protected and has a 60-day money back guarantee. Educational 

Name pricing is available. ACTOR requires an IBM PC/XT or AT or 
equivalent. 640K and hard disk is reeommended.) 


Address [] __ copies of ACTOR with Windows runtime support 
S 


City State Zip at $495 each. 
L] __ copies of ACTOR, including Windows com- 
Daytime phone. plete with MS-DOS Executive, at $550 each. S 


@ Please add $5 for shipping within the US.. 


$30 overseas. 
OREN UAE Gn pen EO, LO rccttsenenrsinges 4” ta S 


The WhitewaterGroup 


Technology Innovation Center 
906 University Place, Evanston, IL 60201 


OC) Check or money order enclosed. 0 Bill my VISA. 0 Bill my MasterCard. 


Nh 
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Now Available 


The Best of MacTutor 
Volume One 


MacTutor is the oldest Macintosh technical 
programming journal continuously published. 


Volume One contains all articles from 
our first year of publication, many $24.95 
of which are no longer in print. 


312 pages, cross-indexed by language or 
subject area; organized chronologically ; all 
articles from December ‘84 - December ‘85. 

Join us in our third year of monthly coverage 
of Asm, APL, Basic, C, Pascal, Modula, Fortran, 
Lisp, Neon, Forth, and the Mousehole. 


FTL Modula-ll 
$49.95! 


Your next computer language. The successor to Pascal, 
Modula is powerful. Why? Once a routine is written, it need 
never be recompiled. Programs work everywhere from Z80 
through VAX. 

FTL Modula-ll is a full Z80 CP/M compiler (MSDOS version 
soon)! It’s fast -- 18K source compiles in 7 seconds! The 
built-in split screen editor is worth $60 alone. Some stan- 
dard features: full recursion, 15 digit reals, CP/M calls, 
coprocesses, assembler and linker. The one-pass compiler 
makes true Z80.COM, ROMable code, too. Get the language 
you've waited for now. Only $49.95! 


FTL Editor Toolkit 


Full source to our split-screen programming editor. Curious? 


Want to customize to your tastes? Want sample Modula-ll 
code? This is perfect for you. Comes with all you need for 
your personal editor or terminal installer. Just $39.95! 


[J Third class subscription: $30 
[J First class subscription: $45 
[J Best of MacTutor, Vol. 1: $24.95 


TE 
Check or money order WORKMAN & ASSOCIA S 


1925 East Mountain St. 
Pasadena, CA 91104 
(818) 791-7979 


We have over 200 formats in stock! Please specify your for- 
mat when ordering. Add $2.50 per order for shipping. We 
welcome COD orders! 





Circle no. 187 on reader service card. 





Circle no. 244 on reader service card. 


SAPIENS STAR SAPPHIRE 


A Common LISP Compiler for the IBM PC™ 


* 710 functions * Unlimited multi-dimensional arrays 

* C source code for Libraries * Object-oriented programming (flavors) 
* Lexical and dynamic scoping §%* Numerical functions 

* Compiles to C (bignums up to 128 digits) 


Star Sapphire is a Common LISP compiler for the IBM PC. LISP is high-level general purpose programming 
language especially suited for writing artificial intelligence applications. All 710 functions of Common 
LISP are supported in Star Sapphire. The memory-intensive requirements of LISP are met with an 8 
megabyte configurable workspace, Sapiens V8. Speed test results show a virtual memory overhead of 
less than 10%. It is primarily written in C. 

Star Sapphire compiles programs to C. This increases speed and efficiency, and allows for porting code to other C 
environments. Compiling to C also permits the combination of LISP and C source code. 

Star Sapphire includes a LISP to C translator, the runtime libraries, a runtime optimizer, and code samples, including 
graphics and an expert system engine. The IBM ROM BIOS is accessible through a library of 
keyboard, screen and graphics routines. The graphics library draws points, lines, and circles. 

Star Sapphire is suitable for AI programming directly on the IBM PC, as well as for use as an AI delivery system. 
Developers can port programs written on larger machines to the desktop computer. Our C interface 
allows for delivery of commercial applications for the PC market. 

SYSTEM REQUIREMENTS: The system requires a DOS-based C compiler which supports huge model. : 

It needs 640K of RAM and a hard disk. Programs developed with Star Sapphire will run on a system p pick: 

95 0 


with 256K of RAM. A hard disk is recommended for large applications. The virtual memory manager 
uses 16-128 kilobytes of RAM at the programmer’s discretion. 


Sapiens Software, 236 Mora St., Santa Cruz, CA 95060 « 408/458-1990 
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C and Assembly Language Programmers!! 


* B+tree relational database development system for C 
and Assembly Language environments under MS-DOS. 





* Multiple keys per data file 
* Temporary indices may be created at run time. 
* Wildcard key value searches 


Real-Time Multitasking Executive | « asct, binary, and floating point key values 

* Virtual file handling allows any number of data and index files to be used. 
@ No royalties — * Source code is availakle. 

™ Source code included * No royalties req'd for your application programs. 

@ Fault free operation 


m Ideal for process control ... and it's FAST! Written 100% in Assembly Language for 


# Timing control provided | ‘ ; , ‘ : 
= Low interrupt overhead | lightning fast execution and small code size. 


@ |nter-task messages 


User Device 
Service 
| Procedures 


Options: | || Assembly language development LIBRARY with over 
m Resource Manager 200 functions which give you- Text Windowing, Floating 


= Buffer Manager Point Math and Trig., High level graphics, etc..... 
@ Integer Math Library AMX is TM of KADAK Products Ltd. 


Saree Ee gE sac only $395.00 COMPLETE 


@ Language Interfaces : PIR AAENN Sane chow one Re only $149.00 COMPLETE 
C Pascal 


PL/M Fortran AMX for a $ 3 US Requires IBM PC/XT/AT or compatible running under 
m@ DOS File Access : 6809 950 MS-DOS or equivalent. 


CP/M-80 68000 1600 ; 
IBM PC DOS Manual (specify processor) 75 BC Associates 


3261 N. Harbor, Suite B 
4k KADAK Products Ltd. (604) 734-2796 





Fullerton, CA 92635 
Telex: 04-55670 


206-1847 W. Broadway, Vancouver, B.C.,Canada V6J1Y5 (714) 526-5151 
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C Bricklin Run 
















C-scape: A Prototyping Tool C-scape: A Screen Generator and Library 

“Everybody who writes software, either commercially or for in-house “Dan Bricklin’s Demo Program without C-scape is like 
applications, should immediately order a copy of Dan Bricklin’s VisiCalc without a printing function.” Joseph Katz, C Notes, Sextant 
Demo Program. Period. No exceptions.” Soft-letter Magazine 

C-scape should immediately be included in that quote. Use Dan C-scape is by far the most flexible and easiest to learn and 
Bricklin’s Demo Program to design exactly how each screen should use screen library available. It offers over 100 useful functions, 
appear. You can even use Demo to capture existing screens, mak- and its unique design makes it easy to create your own functions 
ing language conversion projects easier. Then use C-scape’s with maximum support and minimum constraint. It’s a veritable func- 
demo2c utility to turn each screen into C code, complete with text, tion construction kit. Combined with Dan Bricklin’s Demo Program, 
menus, input fields, masking, and colors. Screens will compile the C-scape will accelerate your programming productivity, boost your 
first time. Then link in C-scape’s library functions for scrolling, creativity, reduce coding errors, and facilitate maintenance. No more 
validation, type support, and much, much more, and presto—your screens from scratch. No more procrustean screen libraries. 






program is done. 









Fully definable validation ¢ full type support ¢ automatic scrolling ¢ full printf % substitution inside field definitions ¢ Lotus- 
like/pop-up/pull-down menus * menus, data entry fields, windows, prompts, text © supports standard C types e full color 
support ¢ completely definable keys °¢ full screen I/O support © user-definable field types © source code included ¢ input 
masking ® field marking © orthogonal and direct field movement ¢ civilized, easy-to-remember function names ® modular construc- 
tion makes debugging/maintenance easy ¢ generic data pointer makes customization easy ® time and money functions ¢ 32,000 + 
fields ¢ error checking aids program development e clear and concise documentation ¢ 800 support and bulletin board. 












30-day guarantee: Following registration you'll get full source code. No run-time license, no royalties. 
$149.00 C-scape (Lattice 3 + /Microsoft 3 +; others call) $219.00 C-scape with Dan Bricklin’s Demo Program 
Please add $3.00 for shipping. Massachusetts orders please add 5% sales tax. 


Another Key to Freedom, from ee Call today! 
Oakland Group, Inc. (U} hence) OIL at 7 314 OF 
675 Massachusetts Avenue, Cambridge, MA 02139 800-233-3733 
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A Note About Prices... 


Introducing the 


PC Designs 


You may well find lower advertised prices elsewhere. 
But before you buy, ask the following questions: 


1) Is the item available? 
2) Do they offer service? 


3) Is the item first quality (some mail-order outfits sell 
hard disks that are “seconds” or discontinued models). 


4) Does the oo of a hard drive include cable anda 
i 


high quality controller? 


5) Is shipping included in cost? 
The list goes on. . . call PC Designs today for more tips on 


buying smart. 





ALL PRICES INCLUDE SHIPPING! 





Hard Disk Drives 
All hard disks include: 
e detailed installation and operations manual 
* formatting software 
¢ low level format in place 
° automatic head park on power down 
* all necessary cabling and mounting 
hardware/rails (AT) 
* boot from hard drive 
¢ one year warranty 


XT Hard Drives 
(include hard disk controller): 
20 megabyte Seagate 1/2 height ST225 


(65MS Access Time) 
Meee On MN ual ile cada ¢ ins gil $399 
30 megabyte Seagate ST238 1/2 height 
(65 MS Access Time) 
DU te a ee Ce ats gi $489 


(includes Adaptec RLL controller) 
AT Hard Drives (Linear Voice Coil Activator): 
Seagate: 
20 megabyte Seagate ST4026 
(39MS Access Time) 

Ra ae Fe as didn oa. sadness $545 
30 megabyte Seagate ST4038 
(39 MS Access Time) 

PER. coe eka sae kN he ee ok eS $629 
40 megabyte Seagate ST4051 
(39 MS Access Time) 

PP. pa cats Se pee as ot ha we ee $745 
80 megabyte Seagate ST4096** 
(25 MS Access Time) 

PRIOR ES feces ear he lb ot ie oes $1,275 
** Ask about our BIOS Customization for high 
capacity hard drives! 


CORE: 

20 megabyte ATPlus (28 MS Access Time) 
Pee cc Foe liens «Grunt cs $1,395 

32 megabyte ATPlus (28 MS Access Time) 
a ES ee Peeping trite a $1,495 

40 megabyte ATPlus (28 MS Access Time) 
RR ert eB SS ce eae wee $1,595 


Call us now: 





56 megabyte ATPlus (28 MS Access Time) 
BEC A ce Wi 5 a OL BG $2,495 
72 megabyte ATPlus** (28 MS Access Time) 
Dine, Sie x. , Liccetasoa bed Ska Be AR A $2,995 


** Ask about our BIOS Customization for high 
capacity hard drives! 


Priam: 

24 megabyte (28 MS Access Time) 
Debra A a ep SaaS A ee Call 

40 megabyte ID-40 AT (28 MS Access Time) 
WOR A ea. Teen baal eas eben 5 Call 

60 megabyte ID-60 AT (28 MS Access Time) 
POM Ay Set a ernst we eatin abi Call 


Streaming Tape Backup Units 
All tape units include: 
e detailed installation and operations manual 
¢ state-of-the-art menu or command driven, 
performance minded streaming tape software 
¢ industry standard controller interface card 
¢ high speed backup—5 megabytes per minute 
* mounting hardware/rails and cables 
Everex Excel Stream 20 Internal 


(Casati i) seco ox, ace y eye ern $589 
Everex Excel Stream 20 External 

(CAeAMOAT 8 te leis po aa Ve ne Feet ae $669 
Everex Excel Stream 60 Internal 

(i. ineb Cartridge))) (35. nts \.'e. ves $759 
Everex Excel Stream 60 External 

(1/4 inch Cartridge).............-..55 $829 
Modems 

ncludes: 


¢ telecommunications software 


¢ fully Hayes command set compatible 
¢ low power, internal 1/2 size cards 
Evercom 300/1200 baud ............. $129 
Evercom 2400 baud internal .......... $289 
Astec 300/1200 baud................ $129 
In Tulsa, 1-918-252-5550 


In New York, 1-212-514-7280 
5837 South Garnett Tulsa, OK 74146 M19 Rector Street, Suite 2705 New York, NY 10006 
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Here in Tulsa, we know athing ortwoaboutbuildinga g 
winning team. And the first rule is: Champions aren't 
born, they’re made. 


~ 
At PC Designs, that same approach has earned us a repu- 
tation for quality, performance and reliability that’s making 
the “Limited” team in Longhorn country mighty envious. 
E 


very peripheral listed below has been thoroughly tested to —~~ 
make sure it lives up to our high st 
— they all live up to our low prices. As for our speed of delivery, 
why do you think they call Oklahoma the “Sooners?” 


So if you haven't talked to the folks here at PC Designs yet, make 
the two-point conversion: 1) Give us a call; 2) Order something. 


AL 


andards. And, of course, 


er 


x 







Monitors 
¢ High Resolution Amber Monochrome. . . .$95 
¢ Princeton Graphics Max-12 ........... $179 
¢ Princeton Graphics HX-12 RGB........ $459 
¢ Princeton Graphics HX-12E ° Ok; 
(EGA Compatible) ......--.. eee. $599. eee ee ae 
* NEC Multisyne © Toshiba P-321 216 cps, 72LQ..........-- call 
(CGA, EGA and PGA Compatible) ....... Call, t.chiba P-351 288 on 100 S Wifey Bae Kall 
° Taxan 760 14” EGA Compatible) ....... $629 
. . Letter Quality: 
Video Display Boards ¢ Epson DX-35 (35 cps) 136col ........... call 
¢ Monochrome Graphics e Epson DX-20 (20 cps) 116col........... save 
Compatible 720x350.........+..+55. $100 —¢ Silver-Reed EXP-500(14cps) ........... call 
¢ Everex Edge Multiple Display Card ..... $249 - « NEC-3550(33 cps)... ee. chee ce ah call 
e Everex Graphics Edge..............+: $249 
* BGA Cémpatles: 55 . cass olny ses oat Call Math Co-Processors/CPU Chips 
: ¢ Intel 8087-2 
Printers (8 MHz for XT compatibles)........... $185 
Because of the nature of our agreement with some __ e Intel 80287-6 
of the manufacturers we are not allowed to adver- (6 MHz for AT compatibles)........... $225 
tise our low prices. We are able to offer excellent — Intel 0287-8 
prices—please call. (8 MHz for AT compatibles)........... $295 
» Epson LQ-800 24 pin, 180 cps, : en AT compatibles) .......... $450 
6Gcps NLG, SBGGL Ts... a es save (replaces 8088-2) $30 
¢ Epson LQ-1000 24 9G TRO ii hy > tet Fe Se Aon oe Oey gt ekats Rae ee 
60 cps NLO, 136601... 6... eee bee save 
¢ Epson FX-85 160 cps, 32cps ........... save Software 
e Epson FX-286 200cps, 40cpsNLQ...... save * Microsoft MS-DOS with GW BASIC 3.2. .. .$99 
¢ Epson LQ-1500 200 cps, 67 cps NLQ..... save [nadditiontothe eee listed above we have 
* Okidata 182 120 cps, 60 cps NLQ, memory expansion boards, keyboards, Boppy 
BGR trea, Ra koe AEN eee save drives, RAM Chip Sets, Surge Protectors, Cables, 
¢ Okidata 183 120 cps, 60 cps NLQ, I etc.—call for information and prices. 
TAG CGE pain ie iocee siny OR eae aie ae Oot ca 
¢ Okidata 192 160 cps, 80 cps NLQ, PRICES SUBJECT TO CHANGE 
Sesh ode aor cke le he cs call WITHOUT NOTICE 
° caida 193 160 cps, 80 cps NLQ, il 
SISOS fone teu Boe HARE ee oe eee F ca 
¢ Okidata 292 200 cps, 100 cps NLQ, PLEASE CALL 
BOOT ac dg eet teed vee sare call FOR LATEST PRICES 
Our Famous Guarantee ee 
We were the first mail-order PC outfit to have rats 
enough confidence in our products and service 


to offer this one, and it still can’t be beat: 
30-Day, Money Back Guarantee; If we can’t 
make our products work for you, we'll gladly 
take them back (call us for a return autho- 
rization). One Year Full Warrantyonevery- £ 
thing, too. If our products fail, call us for a 
return authorization and we'll replace 


them. Free and fast. 


It’s the best guarantee going, but you 


probably won't need it. 





/ 
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A TRAINING 
COURSE FOR 
PEOPLE WHO 











Complete training sessions and 

courses can be scheduled at your 

facility, or at our training centers. 

the 80386. Plus a new intensive In addition to training, Intel offers 

course on the 80286. hardware/software support and 
These in-depth learning sessions are consultants. 


Intel is offering three new 
courses on the world’s most pow- 
erful 32-bit microprocessor- 











designed for engineers and programmers For more complete course informa- 
8 . o 8 ° 

who want to utilize the full power and tion and schedules, call toll-free (800) 

potential of these lightning-fast chips. 548-4725. 

Lectures are combined with hands-on Or to register now; contact one of the 
workshops to provide real-life situations. Intel Training Centers listed below 
Allowing you to apply new concepts and Intel Training Centers 
techniques immediately. Boston Area, Westford Corp. Ctr. San Francisco Area 

‘ Three Carlisle Road, 1st Floor 2700 San Tomas Expressway 

Courses include: Westford, MA 01886 Santa Clara, CA 95051 

80386 System Software (617) 692-1000 (408) 970-1700 

‘ ; Chi Ar Washington, D.C. Ar 
80386 Programming using ASM386 300 N: Martingale Road, Suite 300-7833 Walker Drive, 5th Floor 
High-end Microprocessor Hardware Goo Gopai0sse0 
Design 
= ® 
The new 80286 Microprocessor 
Family Course 


© 1986 Intel Corporation Circle no. 190 on reader service card. 
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SOLUTIONS! 


POWER 


The Power to Run Z-8O software on a PC! 


Never before has it been easier, or more affordable to 
add the power of Z-80 compatability. Plug this half size 
card in your PC, XT, AT or compatible and within min- 
utes you will be running the most powerful CP/M soft- 
ware available including the most popular 
assemblers, compilers, word 
processors, spreadsheets, efc. 
Included with each Z-80 card is vs UM wichoinTERFACe 
our incredible RUN/CPM™ emula- gees iene 
tion software which will allow your PC Doe a TT I 
to emulate 100's of popular CP/M com- | eeu 
puters, such as “'Kaypro,” Osborne,” "Mor- NN eeepc 
row,” Etc. Your CP/M programs will run up to Aa paul) adclnann annanncy ance 
300% faster, with full color, and you can run 







them from your PC’s hard disk or “RAM” disk, and | oD ie py 
run MS-DOS background programs such as Borland's fess terre“ a nas ab ersere ph tecaee a 
“Sidekick” on top of your CP/M programs. RUN/CPM™'’s RTCA | | 
amazing disk emulation feature will actually allow your HAA AAT | 
PC's floppy drives to Directly READ, WRITE and FORMAT 
over 165 different CP/M eoge ae yOu se utmost 
in data disk compatability. The RUN/CPM software 
and Z-80 Co-processor are the perfect solution VLC le Sole) 
iS bringing the power ee the vice to the PC. Up. 
all today and order the most affordable oe : 
Z-80 Co-Processor ever! Sau an ‘ ou rt 


RUN/CPM™ V20/30 Emulator disk back up needs. 
RUN/CPM™ is also available for Quiksave’s incredible speed 
the popular N.E.C. V-20 micro- will allow you to back up 10 
processor Chip. This version megabytes of data in only 10 
supports the 8080 instruc- minutes! Because Quiksave backs 
tion set and runs on PC'S up data on to standard floppy aisk- 
and XT’. Order now ettes, there isno need for an expensive 
at only $99.95 soft- tape drive system. Best of all, Quiksave 
ware only, or comes with 20 “Free” pre-formatted floppy 
$124.95 inclua- disks,* so you can start backing up your valu- 
ingan 8 mhz /_PLM9 _/ able hard disk data immediately. Don’t risk costly 
V-20. L/ AER 7 data loss, order Quiksave™ today and rest assured. 


*Enough disks to backup 10 Megabytes of data on most systems. 
! & QUIKSAVE 
OnLy $99.95 


Backup IO Megabytes 


Transform an IBM PC, XT, AT, or compatible into an SP | 3 |B, Teemu ils eiiaey 
‘Intel’ Micro Development System, capable of 

running 8 bit ISIS-IL, and 16 bit ISIS-IIl (UDI) soft- 

ware while remaining 100% MS-DOS com- 

patible. MICRUN 80, our 8 bif ISIS-II 

Interface is priced at $495 and includes 

the above pictured Z-80 card plus all 


necessary software for running 8 
bit Intel software on PC’s and fateameaneamneehat, SE OE he 


Al’s. MICRUN 86, our 16 bit 
Interface is $450 and does All products come with a 30 Day 
not require hardware, Money Back Guarantee. 


MICRUN 80 and : 
eee 1-800-637-7226 
Soe MICRO INTERFACES 


ona PC, 
6824 N.W. 169th Street 
Miami, Florida 33015 
(305) 823-8088 
s Telex 5106004680 MICRO INTER CO. 
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RUN/CPM is a registered trademark of Micro Interfaces Corporation, Sidekick /s a re. gistered trademark of Borland International, Kaypro /s are gistered trademark of the 
Kaypro Corporation. Intel is a registered trademark of the intel Corporation, CPIM is a registered trademark of Digital Research, 2-80 is a Mate Oh kee Le ae Lee) 
Corp., Quiksave is a registered trademark of Micro Interface Corp. 


Anew Alsys cross-compiler permitting 
Ada programs to be written on an 









Alsys launches 

PC AT-TO-370 ADA 
Cross-Compiler at 
November ADA Expo; 


80286 Debugger also 
introduced. 


was introduced at the November Ada 
Expo in Charleston, W. VA. The cross- 
compiler, pre-validated to AJPO test 
suite 1.7, is priced at $2,995 and 
includes a 4 MB RAM board. 

Two compilers, the Alsys validated 
PC AT self-hosted compiler, and the 
AT-to-370 cross-compiler, are offered 
.. as an option at $4,995. One RAM 
\\, board serves both compilers. 

% The cross-compiler, and 
VA, especially the two-compiler 
% option, implements a ‘‘dis- 

i.) tributed programming”’ 
J i =) environment for which the 
— oe fee Ada language and its 
. | oe | package’ concept is par- 
“a | gs ticularly suited. The two- 
S. compiler option permits 
developers to program in 
Ada and test their results at 
their workstations before uploading 
370 object code to the mainframe. 

Alsys also introduced its PC AT 
debugger called AdaPROBE at the Expo. 
AdaPROBE combines a unique Ada- 
VIEWER with regular debug facilities. 


MSS 


IBM-PC AT and executed on an IBM 370 






ALSYS, INC., 
1432 Main Street, Waltham, MA 02154 


ADA NOW. Tell me more about the 
cross-compiler. 


Name/Title 
Company 
Address 
City/State/Zip 


Phone/Ext 
DD 12 86 


In the US: Alsys Inc., 1432 Main St., Waltham, MA 
02154 Tel: (617) 890-0030 
In the UK: Alsys Ltd., Partridge House, Newtown 
Rd., Henley-on-Thames, Oxon RG9 LEN 
Tel: 44 (491) 579090 
In the rest of the world: Alsys SA, 29, Avenue de 
Versailles, 78170 La Celle St. Cloud, France 
Tel: 33 (1) 3918.12.44 
"Ada is a registered trademark of the U.S. 
Government (AJPO). Alsys is the trademark of 

s, Inc. References to other computer systems use 
trademarks owned by the respective manufacturers. 
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PROGRAMMER?’S SERVICES 


OF INTEREST 





Languages 
MicroMotion has released 
MasterForth, an imple- 
mentation of Forth in the 
Forth-83 standard dialect. 
It runs on the Macintosh, 
IBM PC line, Apple II series, 
Commodore 64, and Z80 
CP/M computers, and pro- 
grams written in Master- 
Forth for one computer 
can run unchanged on all 
the others. The product 
provides a complete pro- 
gramming environment, 
including a macro assem- 
bler and a full-file inter- 
face. Relocatable utilities 
and transient definitions 
make it possible to run sub- 
stantial software packages 
even in a limited memory 
environment. The string 
package, screen editor, and 
resident debugger are stan- 
dard features. Programs 
can also be optimized with 
the optional target compil- 
er. MasterForth is priced at 
$100 — $125. Reader Service 
No. 16. 

MicroMotion 

8726 S. Sepulveda Blvd. 
#A171 

Los Angeles, CA 90045 

(213) 821-4340 


386/ASM from Phar Lap 
Software is an assembler/ 
linker for the Intel 80386 
microprocessor that can be 
used to create applications 
for the 80386 on IBM PC, 
VAX, and Unix host com- 
puter systems. A simple ex- 
tension to the Microsoft 
.OBJ file format has been 
created to support the 
80386; it allows existing 
8086 compilers to be up- 
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graded with minimal ef- 
fort and to work with the 
linker supplied with 386/ 
ASM. The 386/ASM package 
includes the 80386 assem- 
bler, the 80386 linker, a us- 
ers’ manual, and examples 
of 80386 assembly-lan- 
guage programs. It is 
priced at $495 for the IBM 
PC version and $4,995 for 
the VAX/VMS version. Read- 
er Service No. 17. 

Phar Lap Software Inc. 

60 Aberdeen Ave. 
Cambridge, MA 02138 

(617) 661-1510 


ExperTelligence has an- 
nounced a new PROLOG for 
the Macintosh. Exper-Pro- 
log Il allows you to load, ex- 
ecute, and modify PROLOG 
programs interactively. 
The interpreter includes 
real numbers, string ma- 
nipulations, and advanced 
process control. It’s $495. 
Reader Service No. 18. 
ExperTelligence 

559 San Ysidro Rd. 

Santa Barbara, CA 93108 
(805) 969-7874 


Smalltalk/V from Digitalk 
includes graphical icons 
and fonts, a PROLOG com- 
piler, and a source-level de- 
bugger. The language is 
able to perform object 
swapping to a hard disk or 
a RAM disk and can handle 
objects up to 32K in size. It 
runs on the IBM PC/AT and 
is priced at $99. Reader Ser- 
vice No. 19. 

Digitalk Inc. 

5200 W. Century Blvd. 

Los Angeles, CA 90045 

(213) 645-1082 


Simulator-debuggers are 
available from Mecklen- 
burg Engineering that al- 
low you to test and debug 
object modules for 8-bit mi- 
croprocessors on an IBM PC. 
Versions are available for 
the 63xx, 65xx, 68xx, 8085, 


8048, and Z80 processor 
lines. The simulators read 
program or data files in 
hexadecimal format and 
allow you to run, trace, sin- 
gle-step, and set break- 
points. Status displays 
show the contents of mem- 
ory and registers as well as 
disassembled instructions. 
It’s priced at $75. Reader 
Service No. 20. 
Mecklenburg Engineering 
P.O. Box 744 

Chagrin Falls, OH 44022 
(216) 338-8379 


A utility program called Ex- 
E2LNK from Lief Ibsen al- 
lows you to use assembly- 
language modules within 
programs written in Logi- 
tech’s Modula-2. The pro- 
gram converts standard, 
linked object modules to 
the .LNK object format. It 
works with Logitech's Ver- 
sions 1.10 and 2.0 compil- 
ers. It costs DKK 550 ($60). 
Reader Service No. 21. 

Leif Ibsen 

Blommevangen 15 

DK - 2760 Maalov 

Denmark 


BES Systems has released a 
Modula-2 preprocessor 
that allows programmers 
to define and use macros as 
well as include files and 
conditional compilation. 
The full source code, writ- 
ten in Logitech's Modula-2/ 
86, is available for $69.95; 
the compiled utility only is 
priced at $44.95. Reader 
Service No. 22. 

BES Systems 

P.O. Box 270835 

Houston, TX 77277 

(713) 528-7132 


Logical Developments 
has released RF77, a pro- 
gram that translates Ratfor 
code into standard FOR- 
TRAN. Ratfor is a high-level 
structured language that 
eliminates many of the 


strict requirements of the 
FORTRAN-77 standard. RF77 
creates a standard MS-DOS 
ASCII file suitable for com- 
pilation with most MS-DOS 
FORTRAN compilers. It’s 
$65. Reader Service No 23. 
Logical Developments 

P.O. Box 55798 

Houston, TX 77255 


Tools 

PopScreen is a fast screen 
generator for IBM PCs and 
compatibles from Baysoft 
that lets you design your 
displays on screen, with 
easy access to all the PC's 
character graphics fea- 
tures. It allows quick cre- 
ation of boxes, block 
moves, cursor draws, and 
individual or global color 
changes. PopScreen’s com- 
pacted display data struc- 
tures can be written as as- 
sembly-language source 
code, in-line code for Tur- 
bo Pascal, or as linkable 
.OBJ code for other linked 
languages. Displays can 
also be written to .COM files 
to be used in batch files or 
called from DOS. PopScreen 
costs $39.95. Reader Service 
No. 24. 

BaySoft 

P.O. Box 562 

Albany, CA 94706 

(415) 527-6894 


Qlink and Qmake, from 
Electrosoft Corp., can be 
used to maintain software 
for the IBM PC and compati- 
bles. The Olink linker is 
fully compatible with Mi- 
crosoft LINK and operates 
about ten times faster for 
the average program. It 
performs the initial link in 
a way very much like the 
way Microsoft LINK and 
others do, and in addition, 
it builds a map of the pro- 
gram. Olink can then build 
anew executable file by re- 
placing changed object 
modules and tracking new 
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ECOSOFT HOLIDAY SPECIALS 


EVERYTHING FOR THE C PROGRAMMER 


If you know someone (perhaps yourself!) that wants 
to learn the C programming language, have we got a 
deal for you. For a limited time, you get: 


Eco-C88 C compiler $59.95 
CED Program editor 29.95 
Developer's Library Source Code 25.00 
ISAM File Handler 15.00 
Flexi-Graph Graphics Package 39.95 
Eco-Lib MSDOS Compatible Librarian 29.95 
Ecosoft Windowing Library 29.95 
C Programming Guide book (Que Corp) 20.00 
C Self Study Guide book (Que Corp) 17.00 
C Programmer's Library book (Que Corp) 22.00 


Total: $288.75 
Holiday Special: $175.00 
Save Over: $110.00!!! 


The Holiday Special has everything you need for 
your C programming needs. Eco-C88 is a full K&R C 
compiler (less bit fields), with over 200 library 
functions, source code to our cc and mini-make 
utilities, and generates code rivaling compilers 
costing 10 times as much. You also get the source 
code to our library, an MSDOS-obj compatible 
librarian, one of the neatest graphics packages 
around, an easy-to-use windowing package plus a 
library of books to teach you the C language. An 
unbelievable package at an unbeatable price of 
only $175.00. 


Microstat Statistics Package 


Since 1977, Microstat has been one of the most 
popular statistics packages available for 
microcomputers. Just some of its features include: 


Data Managment Subsystem 
Data transformations 
Convert External data 
(e.g. Lotus, Dbase 11. etc.) 

Descriptive Statistics 
Hypothesis Testing Probability Distributions 
Crosstabs and Chi-Square Scatterplots 

ANOVA Factorials, Permutations 


Multiple Regression 
(with Stepwise) 
Correlation Analysis 
Time Series Analysis 
Nonparametrics 


Holiday Special: $250.00 


plus many other unique and easy-to-use features. 
Microstat is available for all MSDOS machines or 
any CP/M80 system using a Z80 CPU. 


The regular price is a bargain at $375.00. At the 
Holiday Special price of $250.00, it’s a steal! 





To take advantage of these special prices, we must have your order in our offices by Jan. 15, 1987. 
To order, call or write: 


1-800-952-0472 (for orders) 


1-317-255-6476 (tech. info.) 





EcCOSOF T; 


Ecosoft Inc. 
6413 N. College Ave. 
Indianapolis, IN 46220 





ic == 


Trademarks: Ecosoft: Microstat. Eco-C88: Microsoft: MSDOS; New Orleans General Data Services: Flexi-Graph 
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THE PROGRAMMERS SHOP 


helps save time, money and cut frustrations. Compare, evaluate, and find products. 





RECENT DISCOVERY 


Tom Rettig’s Library - adds 140 
functions to dBASE III Plus for arrays, 
character and date control, screen, new 
logical expressions, number 
manipulations, and much more. Full 
source (in C, assembler, and dBASE), no 
royalties. Use with Clipper. PC $ 89 


Al-Expert System Dev t 


Arity System-incorporate with C 

programs, rule & inheritance MS $ 279 
Experteach - Powerful, no limit on 

memory size. Samples Pe. 3: 399 
EXSYS - Improved. Debug, file & 

external program access. MS $ 339 
Insight 2+ - dB2, language. MS $ 389 
LPA MicroProlog Introw/APES MS $ 149 
LPA MicroProlog Prof w/APES MS $ 595 
Others: ESP ($839), Expert Choice ($449) 


eas 


BYSO-Common, MacLISP compatible. 


250+ functions, fast PC $ 150 
Microsoft MuLisp 85 MS $ 199 
PC Scheme LISP - by TI PC 3. -95 


TLC LISP - classes, compiler. MS $ 225 

TransLISP - learn fast MS $ 85 

Others: IQ LISP ($155), UNX LISP ($59), 
IQC LISP ($269), WALTZLISP ($149) 


Al-Prolog 


APT - Active Prolog Tutor - build 
applications interactively PG; 3240) 
ARITY Standard - full, 4 Meg 
Interpreter - debug, C, ASM PC $ 350 
COMPILER/Interpreter-EXE PC $ 739 
With Exp Sys, Screen - KIT PC $1250 
LPA MacProlog Complete - incremental 


compiler and an interpreter MAC $ 295 
LPA MicroProlog - intro MS:34 39 
LPA MicroProlog Prof. -full 

memory MS $ 359 


Prolog-86 - Learn Fast, Standard, 

tutorials, samples MS $ 89 
Prolog-86 Plus - Develop MS $ 229 
TURBO PROLOG by Borland PC $ 69 
Others: Prolog-I ($95), Prolog-2 ($839) 


Al-Other 


METHODS - SMALLTALK has 
objects, windows, 

Personal Consultant by T.I. 

Q’NIAL - Combines APL with LISP. 
Source or binary. 

Smalltalk/V-graphics 


Ala 


Baby 34, 36 RPGII by California 
Software - complete mini RPG 
environments for PC include 
compiler, editor (SEU), OCL 
processor. Screen gen., sort, 
data exchange, workstation I/O. 
Separate products for compatibility 
w/IBM System /38, /36, /34. PC $1250 
Unishell - Bourne UNIX shell script 
compiler translates to C and runs 
faster. Portable, hand optimizable code. 
Use as C program generator. PC $ 349 
Circle no. 141 on reader service card. 








Compare Products 
Use Product Specialists 


The Programmer’s Shop is much more than 
the supplier of the largest selection of 
programmers’ software. Trained program- 
ming consultants will answer your questions. 
Ask “product specialists” about Cross 
Assembler, Translators, Debuggers, or 
compilers. 


Our Services: 
* Programmer's Referral List + Dealers Inquire 
* Compare Products + Newsletter 
* Help find a Publisher * Rush Order 
« Evaluation Literature FREE + Over 700 products 
« BBS - 7 PM to 7 AM 617-826-4086 National Accounts Center 


Basic Development System - for 
BASICA; Adds Renum, more. PC $ 105 
Basic Development Tools by 


Sterling Castle Pe ae 
Basic Windows by Syscom Pei 3 +93 
BetterBASIC - all RAM, modules 

Structure. Full BASICA PC $ 165 

8087 Math Support PC $ 89 

Run-time Module PC $ 229 
Better Tools - for Better Basic PC $ 95 


CADSAM FILE SYSTEM - full 

ISAM in MBASIC source. MS $ 75 
GoodBas - maintain code Pe. 329) 
LPI Basic - MS compatible UNIX $1100 
Prof. Basic - Interactive,debug PC $ 79 


8087 Math Support PC $47 
QuickBASIC V2.0-New interface PC $ 67 
TRUE Basic - ANSI PC $ 109 

Run-time Module PC $ 459 
LPI Cobol - ANSI °74 UNIX $1200 
Macintosh COBOL - full MAC § 459 
MBP - Lev. II, native MS §$ 885 


Microsoft Cobol Tools - xref, debugger 
w/source support. Xenix $359 PC $ 219 
Microsoft Version II - upgraded. 


Full Lev. II, native, screens. MS $ 479 
Professional COBOL PC $2695 
Realia - very fast MS $ 839 
Ryan McFarland COBOL MS $ 699 

COBOL-8X MS $ 995 
VS Workbench PC $3500 


Editors for Programming 


BRIEF Programmer’s Editor - undo, 
windows, reconfigure PC ..Call 
EMACS by UniPress - powerful, 
multifile, windows Source:$929 $ 299 
Epsilon - like EMACS, full 

C-like language for macros. PC $ 169 
KEDIT - like XEDIT PC $ 109 
Lattice Screen Editor - multiwindow, 
multitasking Amiga $100 MS $ 
PC/VI - Custom Software PC 3 129 
PMATE - power, multitask PC $ 149 
SPF/PC - fast, virtual memory PC $ 139 
XTC - multitasking PC». 89 


C Libraries-Communications 


Asynch by Blaise PC $ 149 
Greenleaf Comm Lib. PC $ 149 
Multi-Comm - add multitasking, use 
w/Multi-C PC § 149 
Software Horizons pack 3 PC $ 119 
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Pdisk - Improve your PC’s 
performance with disk cacheing, 
extend DOS with single command tree 
structure manipulation and file MOVE, 
and maintain your hard disk with 
Advanced Backup/Restore. PC $159 


C Language-Compilers 
AZTEC C86 - Commercial PC $499 
C86 by CI - 8087, reliable MS $299 
Datalight C - fast compile, good code, 

4 models, Lattice compatible, Lib 


source. Dev’rs Kit PG: $79 
HOT C - new, intriguing PC $ 85 
Lattice C - from Lattice MS $299 


Mark Williams - w/debugger MS $399 
Microsoft C 4.0- Codeview MS $279 
Wizard C - Lattice C compatible, 

full sys. III, lint, fast. MS $389 


C Language-Iinterpreters 


C-terp by Gimpel - full K & R MS $239 
C Trainer by Catalytix PC-3..89 
INSTANT C - Source debug, 

Edit to Run-3 seconds, .OBJs MS $389 
Interactive C by IMPACC Assoc. 

Interpreter, editor, source, 

debug. PC $225 
Introducing C-self paced tutorial PC $109 
Run/C Professional MS $189 
Run/C Lite - improved MS $109 


C Libraries-General 


Blackstar C Function Library PC $ 79 
C Essentials - 200 functions PC $ 85 
C Food by Lattice-ask for source MS $109 


C Scientific Subroutines - Peerless MS $139 
C Tools Plus (1 & 2) PC 3139 
C Utilities by Essential - Comprehensive 

screen graphics, strings, source. PC $139 
C Worthy Library - Complete, machine 


independent MS $269 
Entelekon C Function Library PC $119 
Entelekon Superfonts for C PC $ 45 


Greenleaf Functions-portable, ASM $139 
PforCe by Phoenix - objects PC $299 


C Libraries-Files 


FILES: C Index by Trio - full B+ 
Tree, vary length field, multi compiler 
/File is object only MS $ 89 
/Plus is full source MS $349 
CBTREE- Source, noroyalties MS $ 99 
CTree by Faircom- noroyalties MS $339 
dbQUERY - ad Loc, SQL - based MS $159 
dbVISTA - full indexing, plus optional 
record types, pointers, Network. 
Object only - MS C, LAT, C86 $159 


Source - Single user MS $429 
Source - Multiuser MS $849 
dBASE Tools for C PC S79 
dbc Isam by Lattice MS $199 
dBx - translator MS $319 
w/source MS $519 


AtariST & Amiga 


We carry full lines of Manx, 
Lattice, & Metacomco. 


Amiga - LINT by Gimpel Amiga $ 79 
Cambridge LISP Amiga $200 
Lattice C ST, Amiga $139 
Lattice Text Utilities Amiga $ 75 


Megamax - tight, full ST $200 








THE PROGRAMMERS SHOP 





provides complete information, advice, guarantees and every product for Microcomputer Programming. 
Ps eet rea Oe ee me te ee ee ee ee 


“COBOL FOR 
PC-DOS” SAVINGS 


Order before 12/31/86 and mention this ad 
for the special prices to the right. 


C Support-Systems 


Basic-C Library by C Source PC $139 
C Sharp - well supported. Source, 

realtime, tasks, state system PC $600 
C ToolSet- DIFF, xref, source MS $ 95 
The HAMMER by OES Systems PC $179 
Lattice Text Utilities MS $ 95 
Multi-C - multitasking PC $149 
PC LINT-Checker. Amiga $89 MS $119 
SECURITY LIB-add encrypt to MSC, 

C86 programs. Source $250 PC $125 
Unishell - script compiler PC $349 


C-Screens. Windows. Graphics 


C Power Windows by Entelekon PC $119 


dBASE Graphics for C a OR a 
Curses by Lattice PC $ 99 
ESSENTIAL GRAPHICS - fast, 

fonts, no royalties PC $209 
GraphiC - mono version PC $219 


GraphiC - new color version PC $299 
Multi-Windows - use w/ Multi-C PC $295 
Topview Toolbasket by Lattice PC $209 
View Manager for C by Blaise PC $219 
Vitamin C - screen I/O PC $139 


Windows for C - fast PC $159 
Windows for Data - validation PC $239 
ZView - screen generator MS $199 


Debuggers 


Advanced Trace-86 by Morgan 

Modify ASM code on fly. PC $139 
CODESMITH - visual, modify 

and rewrite Assembler PC $109 
C SPRITE - data structures PC $139 
DSD87 - by Soft Advances PC $ 89 


Periscope I - own 16K PC $249 
Periscope II - symbolic, “Reset 

Box,” 2 Screen PC $119 
Pfix-86 Plus Symbolic Debugger 

by Phoenix - windows PC $249 


Showcase by Test Software PC $135 
Software Source by Atron - 

Lattice, MS C, Pascal, Windows 

single step, 2 screen, log file. MS $115 


w/Breakswitch $199 


Ol eh aad 


MKS Toolkit - Unix-type tools for 
PCDOS include popular vi, ‘awk’ 
report generation language, profiler, 


grep, diff, much more; over 70 utilities 
in all. PC S149 





= HOURS 


8:30 AM - 8:00 PM EST. 









GSA High Level ANSI °74 standard plus compatibility 
with respected complete COBOL environment. 


List Before After 
Microfocus Level II High 12/31 12/31 
Performance COBOL $1500 $ 825 $1470 
OR: Buy one of these Microfocus compilers bundled with 
Sourcewriter and receive extra savings off our regular dis- 
counted price. Normal Special 
List Discount Savings 





Level Il 
with High Performance $3500 $3319 $1789 
Sourcewriter § Professional COBOL $5000 $4544 $3492 
VS Workbench $6000 $5349 $4289 
Fortran & Supporting 
ACS Time Series MS $429 
Forlib + by Alpha - graphics and 
file routines, comm. MS $ 59 
MACFortran by Microsoft MAC $229 
MS Fortran link to C MS $209 


No Limit - Fortran Scientific PC $119 
RM/Fortran - enhanced “IBM 


Professional Fortran’”’ MS $395 
Scientific Subroutines - Matrix MS $149 
Statistician by Alpha MS $259 


Strings and Things - register, shell PC $ 59 


Multilanguage Support 





BTRIEVE ISAM MS $199 
BTRIEVE/N-multiuser MS $469 
CODESIFTER - Profiler. MS $ 99 


HALO Graphics - 115+ devices. 

Animation, engineering, business. 

Any MS language, Lattice, C86 PC $219 
Informix - by RDS PC $689 
Informix 4GL - application builder PC $849 
PANEL - Create screen with editor, 

generates code. Full data validation, 


no royalties. Xenix $539, MS $229 
PolyLibrarian by Polytron MS $ 85 
PVCS Version Control MS $329 
QMake by Quilt Co. MS $ 89 
Rtrieve - Xtrieve option MS $119 
Screen Sculptor - slick, thorough, 

fast, BASIC, PASCAL. PC. $99 


Xtrieve - organize database MS $199 
ZAP Communications - VT 100, 
TEK 4010 emulation, file xfer. PC $ 95 


Pascal and Supporting 


ALICE - learn Pascal, Turbo 

compatible, interpreter PC $ 79 
Exec - Chain Programs MS $ 85 
MetaWINDOW - graphics toolkit PC $139 
Microsoft PASCAL - faster MS $199 
MICROTEC PASCAL - 5 memory models, 

‘‘Iterators’’, 65 bit 8087 strings MS $665 
Pascal Pac with Tidy - formatter, 


utilities PC $ 69 
Pascal Tools - strings, screen PC $109 
Pascal Tools 2 - by Blaise MS $ 85 
Pfas - Portable Isam MS $185 
TurboHALO - 150 routines, IBM 

EGA, Hercules, more PC $ 85 
USCD Pascal - native code MS $ 69 
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Call for a catalog, literature, advice and service you can trust 


800-421-8006 


THE PROGRAMMER’S SHOP™ 
128-L Rockland Street, Hanover, MA 02339 
Mass: 800-442-8070 or 617-826-7531 10/86 
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Pascal-2 - Perhaps tightest compiler 
for MSDOS. Mainframe background & 
power. MS compatible. Complete 
environment. Turbo translator. Get 
detailed specs. PC $ 329 


Other Languages 


APL*PLUS/PC PC $ 469 
Artek ADA Compiler - DOD standard 
minus multitasking PC $ 469 


CLIPPER-dBASE Compiler MS $ 449 
Correct FORTH - ROMable PC $ 80 
ED/ASM - 86 by Oliver PG: ee 
Lattice RPG II Compiler 
MacASM - fast MAC $ 99 
MasterForth - Forth ’83  MACorPC $ 125 
Microsoft MASM - faster MS $ 98 
Modula 2 by Volition Systems MS $ 250 
Modula-2/86 Compiler by Logitech 

w/ 8087 ($105), 512K ($149). PC $ 65 
Pasm - by Phoenix MS $ 149 
SNOBOL4 + - great forstrings MS $ 85 
Turbo Edit/ASM - by Speedware PC $ 85 


Xenix-86 & Supporting 


Basic - by Microsoft $ 279 
Cobol - by Microsoft $ 795 
Fortran - by Microsoft $ 589 


MicroFocus Lev. II Compact COBOL$ 899 
Xenix Complete Development System$1 149 


‘Other Products 


386 Assembler/Linker PC $ 459 
ASMLIB - 170+ routines PC) $2135 
BSW Make - like UNIX make MS $_ 85 


Dan Bricklin’s Demo Program PC. $ 65 
dBrief - Customize BRIEF for dBASE 

development. with BRIEF $275. PC $ 95 
H Test/H Format - XT Fix PC $ 89 
Interactive Easyflow-HavenTree PC $ 129 
Link & Locate - tools to work with 


Intel and Tektronix projects. MS $ 329 
LMK - like UNIX make MS $ 149 
Microsoft Windows PC 75 
Microsoft Windows Software 

Development Kit PL S399 
Opt Tech Sort - sort, merge MS $ 119 
PMaker - by Phoenix PC 99 
Polymake by Polytron MS 


PS MAKE by UniPress MS 
SECRET DISK by Lattice PC 
SET:SCIL - manager revisions PC 
Shrink/Shrinkem - put more files 

on disk with spacemaker PC 
SoftEst - Manage projects. MS 
Synergy-Create user interfaces MS 
Texsys - control source MS 
Visible Computer: 8088 - Simulates 

demos or any .exe. com, Debugger. 

350 pg. tutorial, unprotected PC $ 69 
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Note: All prices subject to change without notice. 
Mention this ad. Some prices are specials. Ask about COD and POs. Formats: 
3" laptop now available, plus 200 others. UPS surface shipping add $3/item. 






“T have been pleased with your catalog selec- 
tion, the knowledge of your telephone 
answering staff, and the promptness of your 
service. I have every wish to become a 
continuing customer of The Programmer’s 
Shop.” 






Carl C. Rollo 








OF INTEREST 
(continued from page 130) 


ones instead of relinking 
the entire program. 
Qmake is similar to the 
Unix make utility. It fol- 
lows a map of the program 
and looks at the file genera- 
tion times to tell if an out- 
put file needs to be con- 
structed based on the 
component source files. 
Omake allows a single exe- 
| cuted command to process 
_ all the files that need to be 
updated. The programs are 
not copy-protected. Olink 
costs $250, Qmake costs 
$100, and a package con- 
taining both costs $295. 
‘Reader Service No. 25. 
Electrosoft Corp. 

3003 Washtennaw Ave. 

ro) Coa | 

Ann Arbor, MI 48104 

(313) 973-1229 


TDebug PLUS, from Turbo- 





Reviewers Comments: 


“The tapes cover the major features of C and are aimed at 
professionals with a background in another computer 
language. The key to the package is that Swartz knows his 


subject and how to teach it.” 


“If you're looking for a way to learn C quickly and easily, this 
course is something you'll want to consider.” 


Price: $400 includes two video tapes (3'4 hours) 
and 106 page manual. 
BERKELEY DECISIONS/SYSTEMS 


ASK ABOUT OUR 
FREE 15 DAY REVIEW 


LEARN C ON 


with the video training course 


A Programmer’s Introduction to C 
by Ray Swartz 


Topics Covered: Data Types * Operators * Expressions * 
Loops * Conditionals * Inputand Output 
Character Handling ¢ Interactive Control 
¢ Arrays * Pointers * Switch 


Power Software, allows 
Turbo Pascal program- 
mers to trace, set break- 
points, and examine and 
set variables at run time us- 
ing the symbolic variables 
from Pascal source code. 
TDebug PLUS automatically 
loads Turbo Pascal, which 
operates normally for edit- 
ing and compiling the pro- 
gram. After the program 
has compiled, TDebug PLUS 
takes control. The source 
code is displayed on one 
half of the screen, and the 
other half displays the de- 
bugging commands and re- 
sponses. TDebug PLUS’s 
MAP files are fully compati- 
ble with many external as- 
sembly-language debug- 
gers. TDebug runs with 
Turbo Pascal 3.0 and costs 
$60. Reader Service No. 26. 
TurboPower Software 
3109 Scotts Valley Dr. 

Ste. 122 

Scotts Valley, CA 94066 
















Dr. Lance Leventhal 






Doug Topham 







TO ORDER CALL 
(408) 458-0500 
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(408) 438-8608 


Artificial 
Intelligence 
A fully functional LISP li- 
brary and programming 
environment for the C lan- 
guage is now available for 
the IBM PC line and either 
Microsoft or Lattice com- 
pilers from Frederick J. 
Drasch Computer Soit- 
ware. Written entirely in 
C, Clisp is Common LISP- 
compatible and consists of 
more than 100 functions, 
including all LISP primi- 
tives, predicates and condi- 
tionals, association and 
property lists, symbolic 
pattern matcher, context- 
sensitive database and 
stack, and an interpreter 
with hooks to add user- 
written functions. It sells 
for $189 (with source code). 
Reader Service No. 27. 
Frederick J. Drasch Com- 
puter Software 


RFD#41 Box 202 
Ashford, CT 06278 
(203) 429-3817 


Gold Hill Computers has 
introduced the GCLISP 386 
Developer and the 386 
HummingBoard for IBM 
PCs and compatibles. The 
GCLISP 386 Developer is a 
powerful Common LISP de- 
velopment environment 
for 386-based systems. It 
addresses up to 15 mega- 
bytes of memory and in- 
cludes a large memory in- 
terpreter and compiler, 
editor, tutorial, and on-line 
help system and supports 
lexical scoping, packages, 
and transcendental func- 
tions. The 386 Humming- 
Board is an Intel 386-based 
plug-in board with memo- 
ry that is specifically tai- 
lored to run large LISP ap- 
plications quickly. Directly 
addressable on-board 
memory is expandable to 


PASCAL-TO-C 


CONVERTERS 


e The Pascal Converter Il has been used to 
translate over 500,000 lines of Pascal. 
Translation rates are in excess of 99%. 
Non-translatable lines are flagged and 
brought to your attention for hand 


conversion. 


° Portability: The conversion allows you to 
transport your Pascal programs to any 
machine or operating system with a standard 


C compiler. 


e Site Licensing Available: The Converter-ll site 
License permits you to make unlimited copies 
at your site, for any number or type of 


machines. 


e Free Sample Conversions: We will convert a 
500 line sample for FREE, so you can see for 
yourself how efficient CONVERTER-II is. 


e Excellent Reference Sites Available 


Contact: CARNEGIE-MADISON, Inc. 
Maurice Platier 
232-B East 68th Street 
New York, N.Y. 10021 
Telephone: (212) 254-4707 
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Program generation 
with power, sophistication, 
and especially 


MSDOS, PCDOS IBM PC 
XT, AT compatibles. 


Name ( ) 
Address ([ ) 
Phone [ 








[acant | Description [ Price | Ant 


: Cyclic Forms i 


Panache was specifically designed to create form-based application 






Free Source Code Included! 


Pa-nache (pa nash’) - 





with dashing elegance 
and style 









Account /([ 
Salesman ([ 
Todays Date ( ) 





Company ([ ) 
Contact ( ) 
Address | 


Bill ( ) 
Terms ( ) 






90 Day ( ) 
60 Day [( ) 
30 Day ( ) 
Interest ( ) 
Rate ( ) 





()Serolling Formsii() 





programs. We wanted powerful screen access capabilities and fast file 
access without sacrificing our customizing capabilities. We wanted to 
be able to add custom code without having to see the generated 
programs. We wanted to be able to add custom code and be able to 
change the screens when the requirements changed. We wanted our 
cake and to eat it too! We wanted the power, performance and 
portability of high level programming languages without all the pain. 
perserverance. and patience. We have found our answer and hope you 


It is reasonable to assume that if a single program-generating system 
were to become popular in the industry. and further. that the program- 
generating system created source code in a transportable language. for 
a variety of popular computers. these conditions would define a 
standard of programming technique unparalleled in the industry 
today... 


Richard L. Roth. AFIPS Conference 1982 


will too when. .you program with Panache. 


Form Editor: 


Al Techniques minimize keystrokes. 


Automatic multi-dimensional array 
recognition. 


Automatic field naming. 
Wordstar ™compatible editor. 
Diagonal cursor movement. 
Pop-Up Windows/Menus. 
Multi-File Clipboard. 

On-Line Help. 

Crash Recovery. 


Order Toll Free 
1-800-624-8711 
In SC call 
1-803-278-3811 


Program Generator: 
Writes “C’’ Source Code. 


Does not generate reams of case 
statements or external data files like 
other similar products. 

Generated code is ultra-efficient. 
Supports all standard data types and 
user-defined types. 


Custom code independence - Code 
that you add in-line is isolated from 
generated code. 

Files feature B + Tree index support. 


Partitioned screens support scrolling, 
flat, and cyclic forms, and Pop-Up 
menus. 


Includes Form Editor, Program 


Generator and Library Packages 


ALL FOR 


TERMS - COD’s and company purchase orders 
accepted. Money Orders and certified checks 
accepted. Personal and company checks take up to 2 
weeks to clear. $4.00 shipping and handling. 

Order Toll Free 1-800-624-8711. 

In SC 1-803-278-3811. 

SC residents add sales tax. 


SIPRYS 
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Library Packages: 


You receive “C”’ source for all 
routines. 


B+ Tree Manager features: 
Optimized fan-out for each key type. 
Secondary key GETNEXT support. 
User defined ordering for keys. 


Open File Cache places no limit on the 
number of files open at a time. 


Disk-Based Garbage Collector 
handles variable length records and 
multiple indexes per file. 
Window/Menu manager is call- 
compatible with UNIX ™curses 
package. 

Generic list processor. 


“Just the B- TREE package is worth 
more than $200”, 


Additional utilities routines for 
building your own program 
generators. 


Digifit Inc. 


105 Clearwater Rd. 
Belvedere, SC 29841 


Fitting solutions to digital problems... 
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OF INTEREST 
(continued from page 134) 


24 megabytes with 1-mega- 
bit DRAMs (up to 6 mega- 
bytes with 256K DRAMs). 
GCLISP 386 Developer costs 
$1,195; when bundled with 
the HummingBoard, it 
costs $7,000. Reader Service 
No. 28. 

Gold Hill Computers 

163 Harvard St. 

Cambridge, MA 02139 

(617) 492-2071 


TEX for Micros 

Addison-Wesley has re- 
leased a complete IBM PC 
implementation of Donald 
Knuth’s TEX typesetting 
system. MicroTEX is a 
“mark-up” system, mean- 
ing that users add special 
instructions to a standard 
ASCII file. The program 
then creates its own file 
that can be used to preview 
the typeset text on the 


9 








mV 


screen. It costs $295 alone; 

with an Epson/IBM print 

driver, it costs $369; and 

with a PostScript driver, it 

costs $495. Reader Service 

No. 29. 

Addison-Wesley 
Publishing Co. 

Jacob Wy. 

Reading, MA 01867 

(617) 944-3700 


FTL Systems has unveiled 
MacTex, a desktop typeset- 
ting software package for 
the Macintosh. MacTeX 
combines TEX with the 
graphics power of Post- 
Script. It offers a full set of 
professional typesetting 
features and creates cam- 
era-ready typeset docu- 
ments on most PostScript- 
compatible typesetters and 
printers. MacTeX also pro- 
vides a built-in, multiwin- 
dow text editor with 
MacWrite-type functions. 
MacPaint images can be 


UNIX 


EQUIVALENT 


Power Tools 


TOOL BOX 1 


cat cp expand fold more mv newer 


page rm unexpand 
TOOL BOX 2 


diff fgrep head od see tail tee unig 


SYSMAKE 


with advanced features from the 


new UNIX Version 8 


For MSDOS and CP/M 


I/O redirection ¢ wildcard expansion 
exclusions @ full documentation 


NIRVONIGS ine 


PO. Box 5062 
Plainfield, NJ 07061 


Trademarks — UNIX: Bell Labs, MSDOS: Microsoft, CP/M: Digital Research 





(201) 561-2155 


Circle no. 331 on reader service card. 
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imported and scaled, and 
248 PostScript commands 
are supported. A preview 
mode allows for on-screen 
WYSIWYG viewing of the 
document text. MacTexX 
runs on the Mac Plus and 
costs $750. Reader Service 
No. 30. 

FTL Systems Inc. 

234 Eglinton Ave. E, Ste. 205 
Toronto, Ont. 

Canada M4P 1K5 

(416) 487-2142 


For the Macintosh 
Peachtree Technology 
has released its first prod- 
uct for the Macintosh, a 20- 
megabyte hard-disk drive 
called the S-20 Plus that is 
two to six times faster than 
the Apple HD-20 drive. The 
external 3.5-inch drive uses 
the Mac Plus SCSI port. It 
costs $1,395. Reader Service 
No. 31. 

Peachtree Technology 
3120 Crossing Pk. 





Norcross, GA 30071 
(404) 662-5158 


The TDBK-20+ from MD- 
Ideas is a tape backup unit 
that lets you back up your 
Mac Plus hard disk quickly. 
The TDBK-20+ utilizes the 
SCSI port and can back up 
22 megabytes on each tape. 
It can back up and restore 
virtually any Macintosh 
hard disk or volume. All 
data is read and verified to 
ensure reliability and in- 
tegrity of all backups. Even 
copy-protected software, 
which normally can be in- 
stalled on a hard disk only 
once, can be properly re- 
stored. The TDBK-20+ re- 
quires a Macintosh 
equipped with a SCSI port 
and costs $1,095. Reader 
Service No. 32. 

MDideas Inc. 

1111 Triton Dr. 


Ste. 205 
Foster City, CA 94404 


lisp 


Build Intelligence Into Your ‘C’ Programs 
With This Fully Functional Lisp Library 
And Programming Environment 


$189 


Over 100 Functions - Common Lisp Compatible 
Very Fast and Small - Around 64k 
Complete Source - Written Entirely in 'C’ 
Good Documentation 


IBM PC - Microsoft, Lattice and DeSmet 


All Lisp Primitives, Predicates and Conditionals 
Association Lists and Property Lists 
Symbolic Pattern Matcher 
Content Sensitive (Lisp) Data Base and Stack 
interpreter With Hooks To Add Your Own Functions 


For more information, call anytime 


(203) 429-3817 


Frederick J. Drasch 


Computer Software 
RFD#1 Box 202, Ashford, CT 06278 


To order Send check or money order for $189 to the above address. 
Call for COD orders No credit card or cornpary PO orders please 
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VISUAL 
WILDCARD 


ENHANCED DIR COMMAND 


2 Display Modes, 4 File Sorts, 
and Size Stat’s and Histogram! 
Great for BIG directories! 


BATCH JOB BUILDER 


Makes it easy to selectively 
process (backup, copy, delete, 
search, list, compile} your files. 


A time-saving program for people with 
many files. For MS-DOS and PC-DOS 
2.00 and up. Send $19.95 to VISUAL 
WILDCARD, CO., 968 Emerald St., 
Suite D-116, San Diego, CA 92103. In 
California add 6% sales tax. Satisfaction 
guaranteed or full refund. Allow 4 to 6 
weeks for delivery. 





— ee — Circle no. 319 on reader service card. 
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Introducing mu LISP -86" 


The professional Al programming environment for MS-DOS™ computers 


The Inter preter: This powerful Al programming environment provides over 400 Common LISP 
functions, special forms, macros, and control variables. 


The Compiler: This optional add-on to the interpreter generates native machine code to make the 
fastest microcomputer LISP even faster. 


Compare muLISP-86 with Golden Common LISP™ Version 1.01 and IQCLISP™ Version 1.02: 


342K $495 


muLISP  GCLISP  IQCLISP muLISP  GCLISP IQCLISP. muLISP  GCLISP IQCLISP 
Execution time Available program space Interpreter retail price 


Write or call Soft Warehouse, Inc. for a more detailed comparison. | Kt 
Execution time ratios based on the Gabriel Test Suite Founded 1979 


Kilobytes of available program space on a 512K PC 


O 
MS-DOS is a registered trademark of Microsoft Corporation. | Warchous CS 2 


i f Gold Hill C ss 
Golden Common LISP is a trademark of Gold Hill Computers 3615 sean Hada) Avenue, Suite 505 ¢ Honolulu, Hawaii 96816 


IQCLISP is a trademark of Integral Quality. 
(808) 734-5801 after noon PST 
Circle no. 333 on reader service card. 
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Best-price UNIX ™ 
applications software. 
Fromthe company 
thatmadeareality 
of best-price 
UNIX operating 
systems. 


Business computing, word processing, 
database management, text prepara- 
tion and software develooment—we've 
selected, developed and added value 
to the best. Once you've converted 
your PC/AT, with our System V, into a 
true multi-user, multi-tasking machine, 
youll demand software that lets you 
get on with the tasks at hand. 


CRYSTALWRITER PLUS 


is a comprehensive word-processing system 
for the multi-user office. It allows concurrent 
use of files, layouts and printers, as well as 
supporting a full range of terminals. 


INFORMIX SQL 


is the relational-database-management sys- 
tem developers will choose for custom appli- 
cations. It offers relational-database flexibility, 
interactive-database queries, a flexible de- 
sign environment, automated functional 
menus, custom screen design and total 
format control. 


UNIX and DWB are trademarks of AT&T 
IBM and IBM PC-AT are trademarks of IBM CORPORATION. 
SYSTEM VAT is a trademark of MICROPORT SYSTEMS, INC. 


HEREARE 





R-OFFICE 


ties a powerful word processor together with 
the file-management, table-spreadsheet, 


report-generation and desktop-management 


chores common to nearly every modern 
Office. 


R/M COBOL 


is Ryan-McFarland’s GSA certified imple- 
mentation of the ANSI X3.23 74 standard. 
R/M COBOL is designed for serious busi- 
ness computing. 


LEX 


is a Standalone system offering complete 
word processing capabilities, as well as utili- 
ties for adapting LEX to any type of video 
terminal or printer. 


SOFTWARE DEVELOPMENT 


from Microport. Our package was derived 
from the extensively-tested Portable C com- 
piler. (The large-model code produced by 
the compiler is among the densest and fast- 
est available) These are true 286 compilers, 
making full and efficient use of the extended 
286 instruction set. The package also in- 
cludes the F77 Fortran compiler. 


TEXT PREPARATION 


from Microport. This package consists 

of the complete System V, Release 2 
Documenter’s Workbench (DWB), and in- 
cludes both the new troff and the old troff. 
Drivers for the HP Laser Jet Printer and 
Apple's LaserWriter are also available. 


These are but a few of our available 
packages. Virtually everything listed in AT&l's 
catalog can now, or will soon run with our 
operating system. 


Circle no. 154 on reader service card. 
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Regarding 
OurSYSTEMV 
operating system. 


More than a look-alike, Microport's System V 
complies with AT&I’s new binary standard 
and was derived from AT&I’s own UNIX Sys- 
tem V, Release 2 iAPX286. It thereby contains 
standard System V features the competitors 
dont support, such as the powerful symbolic 
debugger (SDB), the shell-layering job-con- 
trol facility and the F77 Fortran compiler, as 
well as programming tools such as ctrace, 
cflow and bs. Over 200 utilities come stan- 
dard to let you search and modify files, make 
use of electronic mail, calculate electronically, 
convert data and publish. 


¢ 90 day money-back guarantee 

° Educational site licensing 

¢ Commitment to AT&T source and binary 
standards 


To order: Call any of our numbers below for 
today’s price and product line quote (be sure 
to ask about our buy-two-applications-pack- 
ages-and-get-RUNTIME-free offer). 

You really wouldnt want to pay thou- 
sands of dollars more, would you? 
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MICROPORT SYSTEMS, INC. 
4200 Scotts Valley Drive 

Scotts Valley, CA 95066 
408/438-UNIX or 408/438-8649 (CA) 
or 800/PC2-UNIX 

TELEX 268/863-3650 


OF INTEREST 
(continued from page 136) 


(415) 573-0580 


For the Amiga 
ENVISAGE is a multimedia 
periodical for the Amiga 
computer from Chestnut 
Computer Graphics and 
Sound. Four times a year, 
subscribers receive a maga- 
zine, a stereo cassette tape, 
color photos of Amiga 
graphics, an Amiga disk, 
and a collection of product 
information flyers and ad- 
vertisements for Amiga re- 
lated products. They also 
receive access to a comput- 
er bulletin-board system. 
An annual subscription to 
ENVISAGE costs $60. Reader 
Service No. 33. 
Chestnut Computer 
Graphics and Sound 
P.O. Box 417 
Hatfield, PA 19440 
(215) 855-0741 


A 512K memory-expansion 
box called Alegra is avail- 
able for the Amiga from 
| Access Associates. The 
unit plugs into the expan- 
sion slot and consumes less 
that 5 watts. It allows for 
future upgrades to 2 mega- 
bytes and supports the 
Amiga’s auto-configura- 


tion architecture. The 
price is $379 for the 512K 
version. Reader Service No. 
34. 

Access Associates 

491 Aldo Ave. 

Santa Clara, CA 95054 

(408) 727-0256 


For the Atari ST 

A multitasking operating 

system for the ST is avail- 

able from Beckmeyer De- 

velopment Tools. Called 

Micro RTX, it is fully com- 

patible with TOS and even 

runs unmodified TOS pro- 

grams. The number of ac- 

tive tasks is limited only by 

the amount of available 

memory. Micro RTX is 

priced at $69.95. Reader 

Service No. 35. 

Beckmeyer Development 
Tools 

592 Jean St., #304 

Oakland, CA 94610 

(415) 658-5318 


Mach2 from Palo Alto 
Shipping, is a multitasking 
Forth-83 development sys- 
tem for the Atari ST. Like 
other implementations of 
Forth, Mach2 is highly in- 
teractive, allowing you to 
experiment with the ST 
without going through the 
compile-link-execute cycle. 
The Mach2 package in- 


cludes an integrated GEM 
editor, full GEM and TOS 
support, Motorola assem- 
bler, examples, and a 300- 
page manual. It costs $59.95. 
Reader Service No. 36. 

Palo Alto Shipping 

P.O. Box 7430 

Menlo Park, CA 94062 

(415) 854-2749 

(800) 44-FORTH 


Miscellaneous 
SideTalk from Lattice is a 
package of telecommuni- 
cations programs for the 
IBM PC plus a communica- 
tions programming lan- 
guage. The package can be 
used as a memory-resident 
program or alone. The 
price is $119.95. Reader Ser- 
vice No. 37. 

Lattice Inc. 

P.O. Box 3072 

Glen Ellyn, IL 60138 

(312) 858-7950 


A full version of Unix V is 
available for the IBM PC/AT 
from Microport Systems. 
System V/AT contains more 
than 200 utility programs. 
The implementation in- 
cludes a_ virtual-screen 
windowing system, FOR- 
TRAN and C compilers, and 
a symbolic debugger. The 
file system can be “hard- 
ened” against power out- 


ages through special disk 
software. System V/AT 
costs $159 for a run-time 
package; a software devel- 
opment system with full 
language support costs 
$169; and a site license for 
educational institutions is 
available for $800. Reader 
Service No. 38. 

Microport Systems Inc. 
10096 Soquel Dr. 

Aptos, CA 95003 

(408) 688-0286 


A multitasking kernel for 
780, NSC800, and HD64180 
microprocessors is avail- 
able from Echelon. Called 
QUICK-TASK, it includes full 
source code. The kernel isa 
ROMable code segment of 
less than 4K that supports 
up to 255 tasks with hard- 
ware interrupt support 
and multiprocess synchro- 
nization. The full package 
costs $249. Reader Service 
No. 39. 

Echelon Inc. 

885 N. San Antonio Rd. 

Los Altos, CA 94022 

(415) 948-3820 
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Here’s why you should choose Periscope as your debugger... 


You'll get your programs running fast. “It works 
great! A problem we had for three weeks was 
solved in three hours,” writes Wade Clark of 
MPPi, Ltd. 


You’ll make your programs solid. David Nanian 
says, “I can’t live without it!! BRIEF, a text 
editor my company wrote, would not be as stable 
as it is today without Periscope.” 


You'll protect your investment. We won’t forget 
you after the sale. You'll get regular software 
updates, including a FREE first update and 
notice of later updates. You'll get technical help 
from Periscope’s author. And you’ll be able to 
upgrade to more powerful models of Periscope if 
you need to. One Periscope user writes, “. .. 


your support has won over even the heart of this 
hardened programmer!” 


You deserve the best. Thousands of programmers 
rely on the only debugger that PC Tech Journal 
has ever selected as Product of the Month 
(1/86). You owe it to yourself to find out why, 
first hand. 


You can try it at no risk. You get an uncondi- 
tional 30-Day, Money-Back Guarantee, so you 
can’t lose. 


Start saving time and money now — order toll- 
free, 800/722-7006. Use MasterCard, Visa, 
COD, or a qualified company purchase order. As 
one user puts it, Periscope is “one of the rare 
products, worth every penny!” 


Periscope I, software, manual, 
protected memory board and 


breakout SWHGN..:2 5000... <<. 2 cceece $295 
Periscope II, software, manual, and 

Dreaiedist SWHECR 6k oo ose $145 
Periscope II-X, 


software and manual ............... $115 


Add shipping - $3 US; $8 Canada; $24 elsewhere. 
Ask about air shipment if you can’t wait to get 
your programs up and running! 


PERIS E 


The Periscope Company, Inc. 
(formerly Data Base Decisions) 
14 Bonnie Lane, Atlanta, GA 30328 404/256-3860 
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Its becoming an epidemic . . . everyone is switching to C! 
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Description Quantity PRICE Order 


Split-Screen Text 


C Compiler 
C and Text Editor 


i 
: 
i 


SIS ORES 


ASM Utility 


_ Texas Residents Add 6.125% 
| sales TAX 


PRE PRRRGTED 


SRS SASS SaaS 


Please check method of payment: 
L] CheckL] Money Order] MasterCard/VISA 


Your Card #: 





Expires 

Shipping Charges: (No charge for ASM 
Utility) 

In the U.S.A.: Add $5.00 per Order. 

In CANADA: Add $10.00 per Order. 
OVERSEAS: Add $10.00 per Text Editor. 
Add $20.00 per C Compiler. Add $30.00 
for combined C Compiler and Text Editor. 


Operating System: (Check one) 
L]CP/M Z80 [JMSDOS/PCDOS 


Specify Your Computer Name 
Specify Disk Format 

NAME 

Telephone A/C ( 
Street 

City 

State 


COU eet aP 


2116 East Arapaho 
Suite 363 


software _ Richardson, Texas, 75081 


| Shipping Charges (See at Right) 
TOTAL OF YOUR ORDER: 
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Ask about our Volume Discounts! 
Call 1-214-783-6001 








_ wSeparate Compilation 


= Native Code Generation : 
= Large Memory Model Support 
= Multitasking 
® Powerful Debugging Tools 
= Comprehensive Module Library 
w Available for the PC and the VAX 

Use LOGITECH MODULA-2/86 to 
decrease your overall development cycle 
and produce more reliable, more 
maintainable code. 


~ ae 

¥ MODULA-2/86 $89 
Includes Editor, Run Time System, Linker, 
8087 Software Emulation, Binary Coded 
Decimal (BCD) Module, Logitech's com- 


prehensive library, Utility to generate 
standard .EXE files. AND more! 


4m LOGITECH MODULA-2/86 
“/ with 8087 Support $129 


@ LOGITECH MODULA-2/86 
7” PLUS $189 

For machines with 512K of RAM. 

Increases compilation speed by 50%. 


@ RUN TIME DEBUGGER 

¥ (Source level!) $69 
The ultimate professional’s tool! Display 
source, data, call chain and raw memory. 
Set break points, variables, eee bugs 
in your source! 





( UTILITIES PACKAGE 


a a Post-Mortem Debugger (PMD). _ 
If your program crashes at run-time the 
PMD allows you to analyze thestatusof 
_the program and locate the error. Also _ 
includes a Disassembler, Cross Reference 
Utility, and Version that allows s conditional 
SOE Er - 





2 number: - a 


@u CROSS RUN TIME 


$49 


> WINDOW PACKAGE $49 


Build windows into your programs. Features 
virtual screens, color support, overlapping 
windows and a variety of borders. 





E-e 


—> MAKE UTILITY $29 


Figures out dependencies and automatically 
selects modules affected by code changes 
to minimize recompilation and relinking. 





: | $199 
’ Debugger and ROM Package 


Still available at an introductory price! 





TURBO PASCAL to $49 
MODULA-2 TRANSLATOR 


“Turbo Pascal...is a very good system. 
But dont make the mistake of trying 
to use it for large programs.” 
_ Niklaus Wirth* 
Our Translator makes it even easier for 
Turbo users to step up to Modula-2/86. 
It changes your Turbo source code 
into Modula-2/86 source, solves all the 
incompatibilities, and translates the 
function calls of Turbo into Modula-2/86 
_ procedures. Implements the complete 
Turbo libraries! 


Call for information about sur VAX/VMS _ 


version, Site License, University Discounts, Dealer 


& Distributor pricing. 
30 Day Money Back Ganccs! | 
_ Toplace an order call our special toll free 


~ 800-23 1-717 © 


in California — 


 00°552.8885 








with or without an 8087), our Turbo 
to Modula-2/86 Translator, Run Time - 
Debugger, and Utilities in one holiday — 
package at a special price! _ 


YES I want to step up to 
LOGITECH MODULA-2/86! 


Here’s the configuration I'd like: 


CL) Special Holiday Package $199 
CL Logitech Modula-2/86 $89 

OO with 8087 support $129 

LJ Plus Package $189 
LC) Turbo to Modula Translator $49 
CJ Run Time Debugger $69 
LJ Utilities Package $49 
CJ Library Sources $99 
L) Window Package $49 
LC Make Utility $29 
LJ] ROM Package $199 


Add $6.50 for shipping and handling. Calif. 
residents add applicable sales tax. Prices valid 
in U.S. only. 


Total Enclosed $ 
0 Visa 0) MasterCard 1) Check Enclosed 


Card Number Expiration Date 


Signature 
Name 


Address 
City State Zip 


Phone 


(SB LOGITECH 


Logitech, Inc. 
805 Veterans Blvd. 
Redwood City, CA 94063 
Tel: 415-365-9852 


In Europe: 
Logitech SA, Switzerland 
Tel: 41-21-879656 


In Italy: Tel: 39-2-215-5622 
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Fortran Support 


KO) 
IBM PC/XT/AT & Compatibles 





Versions Available For: 


Microsoft, Supersoft, RyanMcFarland, 
IBM Professional, Lahey, & IBM 


Fortran. 
Forlib-Plus 
$69.95 


Supports graphics, interrupt driven com- 
munication, program chaining, and file 
handling/ disk support. A Fortran coded 
subroutine is included which will plot data 
on the screen either in linear/linear, log/ 
linear, linear/log, or log/log on the appro- 
priate grid. 


Strings & Things 
$69.95 


Supports string maipulations, command 
line usage, DOS call capabilities, SHELL 
generation and data transmission, BATCH 
file control, music generation, PEEKS and 
POKES, PORT access, and general register 
manipulations. 


For-Winds 
$89.95 


Gives the Fortran programmer the capa- 
bility of generating up to 255 windows on 
the screen. Each window can be individually 
scrolled, moved, sized, generated, and 
removed. Both color and monochrome type 
displays are supported. Full source code is 
supplied for customization. 


ACS Time Series 
$495.00 


This is a COMPLETE time series analysis 
package which contains VERY HIGH 
SPEED FFTs, Filter generations, convo- 
lutions, transfer function calculations, auto 
and cross spectra calculations, Cepstrum, 
curve fitting algorithims, coherence calcu- 
lations, and many other associated routines. 
The price includes FULL source code. 


Fortran Scientific 
Subroutine Package 
$295.00 


There are approximately 100 Fortran sub- 
routines included which fall under the 
following 12 categories: 

1) Matrix storage and Operations 2) 
Correlation and Regression, 3) Design 
Analysis (ANOVA), 4) Descriminant Anal- 
ysis, 5) Factor Analysis, 6) Eigen Analysis, 7) 
Time Series, 8) Nonparametric Statistics, 9) 
Distribution Functions, 10) Linear Analysis, 
11) Polynomial Solutions, 12) Data 
Screening. Full source code is included. 


prs 


Alpha Computer Service 
P.O. Box 2517 

Cypress, California 90630 
(714) 894-6808 


California Residents 


Include 6% Sales Tax There are NO license fees 
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ay Duncan, Allen Holub, and I 
flew up to Redmond, Washing- 
ton in October for a Microsoft semi- 
nar on languages. Navigating the 
halls, we had to dodge the pushcarts 
loaded with newly arrived 80386 ma- 
chines. There was an AT with EGA on 
every desk. A four-building network 
that works. Sixty Sun workstations. 
Yeah, but they get a lot of rain. 

One feature of the seminar was a 
“Storm the Gates’ programming con- 
test. Frivolous though it was, I must 
admit that it was also a good show 
and that Bill Gates finished well 
ahead of all challengers. 

Microsoft is concerned just now 
with competition of a more commer- 
cial sort from Borland International. 
QuickBASIC, Version 2, recently be- 
came Microsoft’ S — prod- 





at Borland’ S Wank like no other 

product in the company’s history. 
What is Borland’s market, as Micro- 

soft sees it? Microsoft language mar- 





keting manager fees Dickerson. 


polled QuickBASIC 1.0 z 
cal users. In each case, most used the 
product at work, and they usually 
employed it for data management. A 
picture of a business user writing 
small report programs suggests itself. 

Well, maybe. Meanwhile back in 
Scotts Valley, Borland has listened to 
its market and released a new version 
of Turbo Prolog. Is this the same Bor- 
land market? Perhaps a BASIC and a 
Pascal can share one market, but who 
are the users of Turbo Prolog, and 
does any of this have anything to say 
about who will buy a Turbo C or 
QuickC? 

I ask that question because Micro- 
soft and Borland are at work on Tur- 
bolike C compilers. Bill Gates said at 
the conference that he wants to see 
Borland bring out a Turbo C, and I’m 
sure that Phillipe Kahn will be sent 
one of the first beta copies of QuickC. 
One market for QuickC could be Win- 
dows developers looking for a fast 
prototyping tool. I’m sure that either 
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company could do well with a Turbo- 
like C compiler, but I can't believe that 
the audience is Turbo Pascal 
programmers. 

(Another product that may make 
Windows development more appeal- 
ing is a third-party 34010 graphics 
board that will be announced shortly 
after my deadline for this column.) 

One of the most demanding mar- 
kets for Microsoft's C compilers is Mi- 
crosoft, and one of the most impor- 
tant projects underway at Microsoft 
just now is the work on optimization. 


Since Microsoft does all its program- 


ming in C and assembly language 
now, optimizing its own C compilers 
should result in immediate improve- 
ments across its entire product line. 
What makes serious optimization 
promising is the 80386 chip, as global 
dataflow analysis has until now 
proved too demanding for micropro- 
cessor power. What's scary for Micro- 


_ soft is a new kind of competition. Rob 


Dickerson admits to being worried 
about the minicomputer compiler 
vendors who already have powerful 
optimizing compilers. Some of these 
will surely survive the radical para- 
digm shift into the microcomputer 
market and make life interesting for 
microcomputer compiler vendors. 
It's not clear whether Microsoft is 
worried by operating system com- 
petitors in the 386 environment. 
Xenix-386 is out, albeit with a 286 ker- 
nel, and non-Unix types may be will- 
ing to wait for an MS-DOS. But The 
Software Link of Atlanta is promising 
to deliver a native-mode multitasking 


operating system for the 386 that will 
be compatible with and replace DOS. 
And DRI keeps polishing its Concur- 
rent DOS for PC machines—the ver- 
sion now in beta is getting good 
marks. Well, we'll see. 


On the flight to Redmond I worked 
a crossword puzzle. One clue was 
“one who takes drugs.” The answer: 
addict. Yes, it’s heartening to see even 
crossword puzzle writers getting in 
on the act and analyzing the drug 
problem as thoroughly as Congress 
and the television networks have. 

My cousin Corbett thinks DDJ 
ought to join the campaign. Addic- 
tion, he says, is a serious problem 
among programmers, and _ it’s 
spreading rapidly. Corbett has 
shown me frightening statistics on 
the number of programmers who 
only get up from their keyboards 
during the compile phase and urges 
me to consider what will happen to 
these code junkies when they get 
their hands on 386 machines. Labora- 
tory pigeons on a killer reinforce-— 
ment schedule. Gruesome. 

I'd been wondering for months 
what was behind Fast Willie's editori- 
al in PC Tech Journal begging Intel to 
hold off on releasing the 386. Now I 
understand: Willie was doing his bit 
to fight programming addiction. 

Corbett, who abhors mice and win- 
dows, spent some time recently pro- 
gramming in Smalltalk and conclud- 
ed that it’s nonaddictive. He is 
currently negotiating with a soft- 
ware vendor to develop a rehabilitat- 
ing object-oriented programming en- 
vironment, the first version of which 
will be called MethodOne. 


Michael Swaine 
editor-in-chief 
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MAKE YOUR IBM PC 


FASTER THAMLA 


WOM ax 


he) OFFER $395 


DON’T TAKE OUR WORD FOR IT. 
USE IT FOR 60 DAYS. IF YOU ARE 
NOT TOTALLY SATISFIED RETURN 
IT FOR A FULL REFUND. 


It sounds great; the idea of a speedup board that you can just 
pe right in as easily as putting bread in a toaster. How wonder- 
ul to be able to convert a PC or XT to a $4000 AT without the ex- 
pense. But even when you get ready to spend $395.00 you want 

to be sure your choice is the very best. 

Here at PCSG we sell our IBM PC disk access speedup software 
by the thousands. But software doesn’t do gids: Sota speed- 
ing up the microprocessor (or CPU) speed. As you know the mi- 
croprocessor is the brain of the computer that controls all the 
operations like screen updates and calculations like a spread- 
sheet makes. 





Faster and smarter than an AT — 
PCSG guarantees it. 





We wanted to offer a speedup card that would be the comple- 
ment to our disk speedup software, (incidentally included at no 
extra charge.) We wanted it to be literally the most advanced, 
compatible and feature rich board available today. We could only 
be satisfied with a board that was the finest example of the engi- 
neering art. 

There is no question we have met our every objective by devel- 
oping and manufacturing the BREAKTHRU 286 card. This is the 
best designed and most functional speed up card available today. 
We guarantee it. 

HERE IS WHAT MAKES IT SO SPECIAL. 

First, it installs so easily. It is a half slot card, only five in- 
ches in length. You don’t even have to give up a full slot. What’s 
more, unlike competing products it works in the Compaq and 
most clones. The instructions are so simple we considered show- 
ing a picture of a child putting it in. Easy diagrams show how 
you just place the card in an open slot, remove the original pro- 
cessor and connect a single cable. There is no software required. 
From that moment you are running faster than an AT. 

Second, it is advanced. The BREAKTHRU 286 replaces the 
CPU of the PC or XT with an 80286 microprocessor that is faster 
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than the one found in the AT. A 16K cache memory provides 
zero-wait-access to the most recently used code and data. In 
benchmark tests the card accelerated software programs— 
both custom and off-the-shelf anywhere from 500% to as much 
as 700%. Acceleration factor is up to 7.8x on the Norton 
SysInfotest! Wow! 

Third, you have full compatibility. All existing system 
RAM, hardware, and peripheral cards can be used without 
software modification. It operates with LAN and mainframe 
communication products and conforms to the Lotus/Intel/ 
Microsoft Expanded Memory Specification (EMS). Software 
compatibility is virtually universal. 

Fourth, it is the best there is. There are several other 
boards on the market. Some are priced about the same as the 
BREAKTHRU 286 and some are cheaper. We at PCSG have 
eet them all, but there simply was no comparison. What 
we discovered is that many cards being sold offer only a marginal 
speed up in spite of their claims. We found some to be merely 
versions of the obsolete 8088 or 8086, and others to be just poorly 
engineered. The 8MHz BREAKTHRU 286 is unequivocally the 
best executed and most completely reliable speedup board 
manufactured today. 

PCSG has since early 1983 dominated the lap portable market 
with ROM software such a Lucid spreadsheet and Write ROM 
that reviewers rated as excellent. We were proud to successfull 
enter the IBM PC market last year with tisk access speedu oft 
ware. Now we are so pleased with the BREAKTHRU speedup 
card. We use them on our own PC’s to make them faster than 
Al's. We are really excited about this product. 

PCSG makes the unabashed statement that the BREAKTHRU 
286 card represents more advanced technology than boards by 
Orchid, Quadram, Victor, Mountain, P.C. Technologies, Phoenix 
...we could go on. 

But an ad can’t let you experience it for yourself. That’s why 
we sell the BREAKTHRU 286 on a 60 day trial. If you aren’t com- 
Py satisfied return it within 60 days for a full refund. It is 

riced at $395. Call today with your MasterCard, Visa, American 
xpress or COD instructions and we will ship your card the very 
next day. 
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Why more than half a million 
people are using Turbo Pascal 
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Because Turbo Pascal is Turbo Pasoal” 50 
faster than any other Pascal “ure 

al atabase 
compiler—it s become the Toolbox” 
industry standard. And Turbo Graphix 
because Turbo Pascal is Toolbox* 
backed by a complete range Turbo Tutor® 2.0 
of “tool boxes” that give oo 
you most of the program- : 

' Turbo GameWorks 

ming tools you'll ever need. 

The Turbo Pascal family is A whole family of tools Hercules,” or compatible graph- 
never static, but is continuously Success breeds success, 80 ics adapter. Does complex busi- 
expanding, with new products the Turbo Pascal family has flour- ness graphics, easy windowing, 
like Turbo Editor Toolbox and ished. Your choices now include: and stores screen images to 
Turbo Gameworks. C] Turbo Pascal 3.0 combines pong 

yage deal of the the fastest Pascal compiler with  “ Turbo Tutor «.0 teaches you 
re ae utbo = an integrated development step-by-step how to use Turbo 
ce puntemann, PC magazin environment, and8087 math © Pascal, with commented source 
" has got to be the co-processor support and Binary 00d for all program examples 
Turbo Pascal ages on the Coded Decimals on diskette. 
est value in tanguag’> 
market today alte, BYTE Magazine C) Turbo Database Toolbox An offer you can’t refuse 
jerry Pournelle © Se enn ene Youcan save $119.75 when 
library of Pascal ode tha, 2U ohne ae Pune cee 
allows you to search and sort ich leat tice 
covington, data mt build powerful database peers i ae mars d 
journal 99 _\ applications. a ae 
| Turbo Editor Toolbox and Turbo 
[] Turbo Graphix Toolbox Tutor 2.0 and Turbo Graphix 
The secret of software success cludes a library of graphics Toolbox and Turbo GameWorks 
is not merely low price, but top -«-‘Toulines for Turbo Pascal pro- and Turbo Database Toolbox! 
quality allied with complete doc-  Srams. Lets even beginning So act now—rush to your 
umentation, like our 400-page Programmerscreatehigh- _—— dealer or calll us today! 
reference manual. resolution graphics with an IBM, 
seatlcaeriet tae tig \N! Amazing value! Turbo Also includes MicroSt let 
. Z V : lr SO Inciudes Microotar, a complete 
Cah te Le ec Ne Editor Toolbox includes editor with full windowing capabilities. 
ale . MicroStar, a full-blown editor (You could pay $100.00 or more for a 
recipient of awards like PC ihol slob dacs windwecl You program like MicroStar, but you get it 
Week's “Product of the Year” get ready-to-compile source code and _‘"e€ as part of our Turbo Editor Toolbox, 
and PC Magazine's “Award for a 200-page manual that tells you how —-YOu can also use Turbo Editor (which of 
Technical Excellence.” to integrate the editor procedures course integrates with Turbo Lightning °) 


to build your own word processor! 





and functions into your programs. 


yew! TNT A | 
DYNAMI TE DEAL! ¢ \ Turbo GameWorks needed to write and customize your 
Turbo WN Tutor N gives you the games you own irresistible games. 


Turbo Pascal and Turbo Tutor for 
only $125.00. You save nearly 
$15.00, and have everything you 
need to get up and go with 


can play, write, rewrite, bend Also includes ready-to-play Chess, 


and amend! Turbo GameWorks Bridge, and Go-Moku—an ancient 
reveals the secrets and the strategies of Japanese game that can 
game design. You're given source code, ‘€alily for hours on end. 
a 200-page manual, and the insight ~ 


| Turbo Pascal! 








=z »» BORLAND 


INTERNATIONAL 


ive bo rer? 


Borland products include Turbo Prolog; Turbo Pascal; Turbo Pascal for the Mac; Turbo Tutor; Turbo Editor Toolbox: Turbo Database 
Toolbox; Turbo Graphix Toolbox; Turbo GameWorks; Turbo Lightning; Lightning Word Wizard; Reflex: The Analyst; Reflex for the Mac: 
Reflex Workshop; SideKick; SideKick for the Mac; Traveling SideKick; and SuperKey—all of which are trademarks or registered trade 
of Borland International, Inc. or Borland/Analytica, Inc. Traveling SideKick is not in any way associated with Travel 
Software, Inc. of Seattle, Washington. 

CP/M-80 is a registered trademark of Digital Research, Inc. MS-DOS is a registered trademark of Microsoft Corp. IBM is a registered 
trademark of International Business Machines Corp. Hercules is a trademark of Hercules Computer Technology 
Copyright 1986 Borland International. BI-1082 


Circle no. 161 on reader service card. 





4585 SCOTTS VALLEY DRIVE 
SCOTTS VALLEY, CA 95066 
(408) 438-8400 TELEX: 172373 © 


: i Prices include shipping to all US cities. 
a Carefully describe your computer system: 


= 8 My computer's name and model is: 


| The disk size | use is; 0 3%" 5%" 08" 


SRR new we 
= 
2 


| a CODs and purchase orders WILL NOT be accepted by Borland. 


(8 s60-pay money-sack Guaranree =O & 
| a if within 60 days of purchase this product does not perform 4 










































Y H} os | | want B 
e the best! @ 
To order by phone, 
or for a dealer nearest you, 
call (800) 255-8008 
in CA call (800) 742-1133 
| E Copies Product Price Totals 
___. TurboPascal3.0w/8087 &BCD*" $ 99.95 $ 
ee —— Turbo Pascal for CP/M-80 69.95 $ 
BD to oatatase tooivox 69.95 $ 
a __ Turbo Graphix Toolbox” 69.95 $ 
—— Turbo Tutor 2.0 39.95 $ 
_— Turbo Editor Toolbox” 69.95 $ 
___. Turbo GameWorks™ 69.95 $ 
_— Turbo Pascal & Turbo Tutor 125.00 $ 
:— Turbo Jumbo Pack* 299.95 $ 
Outside USA add $10 per copy 
CA and MA res. add sales tax $ 
& Amount enclosed $ 


& Mine is: __ 8-bit __ 16-bit 
/ use: _ PC-DOS __MS-DOS __ CP/M-80 __CP/M-86 


Payment: VISA MC Money Order Check 


Credit card expiration date —__/_ 


Card # 


Shipping Address: 


City: 
Sia nn ee ZB. 


Telephone: 


Outside USA make payment by bank draft, payable in US dollars a 
drawn on a US bank. 


NOT COPY PROTECTED 


in accordance with our claims, call our customer service 


= a department and we will gladly arrange a refund. . & 


All prices are suggested list prices and are subject to change ie 
without notice 





0 Minimum System Requirements: i 
= B Turbo GameWorks, Turbo Graphix Toolbox, Turbo Tutor, & g 
Turbo Editor Toolbox—192K. All other products, 128K. 


“IBM PC, PCjr, AT, XT, and true compatibles. 


ee Gg **16-bit only. Ee 


